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PREFACE 


This  product  specification  covers  the  work  performed  under 
Air  Force  Contract  F33615-80-C-5155  (ICAM  Project  6201).  This 
contract  is  sponsored  by  the  Materials  Laboratory,  Air  Force 
Systems  Command,  Wright-Pat ter son  Air  Force  Base,  Ohio.  It  was 
administered  under  the  technical  direction  of  Mr.  Gerald  C. 
Shumaker,  ICAM  Program  Manager,  Manufacturing  Technology 
Division,  through  Project  Manager,  Mr.  David  Judson.  The  Prime 
Contractor  was  Production  Resources  Consulting  of  the  General 
Electric  Company.  Schenectady,  Mew  York,  under  the  direction  of 
Mr.  Alan  Rubenstein.  The  General  Electric  Project  Manager  was 
Mr.  Myron  Hurlbut  of  Industrial  Automation  Systems  Department. 
Albany,  Mew  York. 

Certain  work  aimed  at  improving  Test  Bed  Technology  has 
been  performed  by  other  contracts  with  Project  6201  performing 
integrating  functions.  This  work  consisted  of  enhancements  to 
Test  Bed  software  and  establishment  and  operation  of  Test  Bed 
hardware  and  communications  for  developers  and  other  users. 
Documentation  relating  to  the  Test  Bed  from  all  of  these 
contractors  and  projects  have  been  Integrated  under  Project  6201 
for  publication  and  treatment  as  an  integrated  set  of  documents. 
The  particular  contributors'  to  each  document  are  noted  on  the 
Report  Documentation  Page  (DD1473).  A  listing  and  description 
of  the  entire  project  documentation  system  and  how  they  are 
related  is  contained  in  document  FTR620100001 ,  Project  Overview. 

The  subcontractors  and  their  contributing  activities  were 
as  follows: 


TASK  4.2 


Subcontractors 

Boeing  Military  Aircraft 
Company  (BMAC) 

D.  Appleton  Company 
(DAC0M) 


General  Dynamics/ 
Ft.  Worth 


Role 

Reviewer 


Responsible  for  IDEF  support, 
state-of-the-art  literature 
search 

Responsible  for  factory  view 
function  and  information 
models 
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Subcontractors 

Illinois  Institute  of 
Technology 

Korth  American  Rockwell 
Northrop  Corporation 

Prit6ker  and  Associates 
SofTech 


Role 

Responsible  for  factory  view 
function  research  (IITRI) 
and  information  node Is  of 
small  and  medium- size  business 

Reviewer 

Responsible  for  factory  view 
function  and  information 
models 

Responsible  for  IDEF2  support 
Responsible  for  IDEPO  support 


TASKS  4.5  -  4.9  (TEST  BEP) 


Subcontractor  s 


Boeing  Military  Aircraft 
Company  (BMAC) 


Computer  Technology 
Associates  (CTA) 


Role 

Responsible  for  consultation  on 
applications  of  the  technology 
and  on  IBM  computer  technology. 

Assisted  in  the  areas  of 
communications  systems,  system 
design  and  integration 
methodology,  and  design  of  the 
Network  Transaction  Manager. 


Control  Data  Corporation 
(CDC) 


Responsible  for  the  Common  Data 
Model  (CDN)  implementation  and 
part  of  the  CDM  design  (shared 
with  DAOOM) . 


D.  Appleton  Company 
(DAOOM) 


Responsible  for  the  overall  CDM 
Subysten  design  integration  and 
test  plan,  as  well  as  part  of 
the  design  of  the  CDM  (shared 
with  CDC).  DAOOM  also 
developed  the  Integration 
Methodology  and  did  the  schema 
mappings  for  the  Application 
Subsystems . 


iv 
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Subcontractors 


Role 


Digital  Equipment 
Corporation  (DEC) 


McDonnell  Douglas 
Automation  Company 
(McAuto) 


On-Line  Software 
International  (OSI) 


Consulting  and  support  of  the 
performance  testing  and  on  DEC 
software  and  computer  systems 
operation. 

Responsible  for  the  support  and 
enhancements  to  the  Network 
Transaction  Manager  Subsystem 
during  1984/1985  period. 

Responsible  for  programming  the 
Communications  Subsystem  on  the 
IBM  and  for  consulting  on  the 
IBM. 


Rath  and  Strong  Systems 
Products  (RSSP)  (In  1985 
became  McCormack  9  Dodge) 


Sof Tech ,  Inc . 


Software  Performance 
Engineering  (SPE) 


Structural  Dynamics 
Research  Corporation 
(SDRC) 


Responsible  for  assistance  in 
the  implementation  and  use  of 
the  MRP  II  paokage  (PIOS)  that 
they  supplied. 

Responsible  for  the  design  and 
implementation  of  the  Network 
Transaction  Manager  (NTH)  in 
1981/1984  period. 

Responsible  for  directing  the 
work  on  performance  evaluation 
and  analysis. 

Responsible  for  the  User 
Interface  and  Virtual  Terminal 
Interface  Subsystems . 


Other  prime  contractors  under  other  projects  who  have 
contributed  to  Test  Bed  Technology,  their  contributing 
activities  and  responsible  projects  are  as  follows: 


Contractors 


ICAM  Project  Contributing  Activities 


Boeing  Military 
Aircraft  Company 
(BMAC) 


1701 ,  2201 ,  Enhancements  for  IBM 
2202  node  use.  Technology 

Transfer  to  Integrated 
Sheet  Metal  Center 
( ISMC) 


PS  620141100 
1  Roveaber  1985 


Contractors 

I CAM  Project 

Contributing  Activities 

Control  Data 
Corporation  (CDC) 

1502.  1701 

IISS  enhanceaents  to 
Conaon  Data  Model 
Processor  (CDMP) 

D.  Appleton  Conpany 
(DAOOH) 

1502 

IISS  enhanceaents  to 
Integration  Methodology 

General  Electric 

1502 

Operation  of  the  Test 
Bed  and  coaauni cat ions 
equipaent . 

Hughes  Aircraft 

Conpany  (HAC) 

1701 

Test  Bed  enhanceaents 

Structural  Dynamics 
Research  Corporation 
(SDRC) 

1502.  1701, 
1703 

IISS  enhanceaents  to 
Dser  Interface/ Virtual 
Terainal  Interface 
(UI/VTI) 

Systran 

1502 

Test  Bed  enhanceaents. 
Operation  of  Test  Bed. 

vi 
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FOREWORD 


This  is  the  second  bound  segment  of  four  comprising  Volume 
V,  Part  6  of  the  Final  Technical  Report.  It  contains  Sections 
3.10.8  CPFONE  through  INITRDL. 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  CPFONE 

PURPOSE:  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED 

LIST 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  CPF 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  CPFONE (LST,  TYPE,  STRING,  COUNT) 

COBOL 

CALL  "CPFONE”  USING 


LIST-NO, 


TYPE-ROW , 


TOKEN, 


LIST-COUNT. 

FORTRAN  --  CALL  CPFONE(LST,  TYP ,  TOKEN.  COUNT) 


INPUT: 


LST  —  AN  INTEGER  IDENTIFYING  THE  LIST  TO  BE 

ACCESSED. 

OUTPUT : 
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TYPE 

FOR  IISS,  THIS  WILL  ONLY  HAVE  A  VALUE  OF  "ROW 

STRING  -  A  BLANK  PADDED  CHARACTER  STRING.  ITS  LENGTH 

DEPENDS  ON  THE  LIST  BEING  ACCESSED.  THIS 
WILL  CONTAIN  THE  TOKEN  PLACED  ON  THE 

LIST  BY  THE  PARSER. 

COUNT 

AN  INTEGER  REPRESENTING  THE  NUMBER  OF 
TOKENS  THAT  WERE  PLACED  ON  THE  LIST. 

NOTE  THIS  COULD  BE  0. 

DESCRIPTION 


FOR  THE  GIVEN  LIST  NUMBER,  SET  UP  THE  OUTPUT  COUNT 
VARIABLE.  THE  TYPE  AND  THE  TOKEN  IF  FOUND.  NOTE  THE 
OUTPUT  TOKEN  IS  BLANK  PADDED. 

ARGUMENTS : 


LST  -  I NT  * 

TYPE  -  CHAR  * 

STRING  -  CHAR  * 

COUNT  -  I NT  * 


INCLUDE  FILES: 


LISTS  -  PROVIDES  THE  DIMENSIONS  OF  THE  NDDL  LISTS 

NDDL  -  ***•  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 


ROUTINES  CALLED: 


STRNCPY 


CALLED  DIRECTLY  BY: 


ADDATT  -  ASSOCIATES  EXISTING  ATT  WITH  ENTITY  IN  CREAT 

ENTITY  COMMAND 

ADDKC  -  CONTROLS  PROCESS  FOR  KEY  CLASS  CLAUSE  FOR 

CREATE/ALTER  ENTITY 

ADDKW  -  ADDS  KEYWORDS  FOR  COMMANDS  USING  “ADD 


3-316 


PS  620141100 
1  November  1985 


KEYWORD" (OPTIONAL) 

ADDMIG  -  PROCESS  THE  ADD  MIGRATES ...  SET .. CLAUSE 

ALTALI  -  CONTROLS  ALTER  ALIAS  PROCESSING  (ALIAS  TO  PRIM 

OR  VICE  VERSA) 

ALTCARD  -  PROCESS  CARDINALITY  FO  USER  SPECIFIED  RELATION 

ALTDOM  -  PROGRAM  NAME 

ALTENT  -  CONTROL  PROCESSING  FOR  ALTER  ENTITY  CLASS 

COMMAND. 

ALTMOD  -  CONTROLS  PROCESSING  FOR  ALTER  MODEL  COMMANDS 

ALTREL  -  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER 

RELATION  COMMAND 

BLVWLST  -  CREATE  BUILD  VIEW  LISTS  FOR  THE  CREATE  VIEW 

COMMAND 

CHKCARD  -  OBTAINS  THE  USER-SPECIFIED  CARDINALTY  (IF  ANY) 

FOR  THE  RELATION. 

CHKMOD  -  DETERMINES  WHETHER  CERTAIN  RULES  ARE  FULFILLED. 

CMBENT  -  GONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 

CMPMOD  -  CONTROLS  THE  PROCESSING  LOGIC  TO  COMPARE  TWO 

MODELS. 

OOPATT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING  AN 

ATTRIBUTE. 

COPENT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

ENTITY  COMMAND. 

CPYMOD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

MODEL  COMMAND. 

CRTALI  -  CREATES  ALIASES  FOR  AN  ENTITY  OR  ATTRIBUTE. 

CRTATT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  CREATING  AN 

ATTRIBUTE . 

CRTDOM  -  PROGRAM  NAME  CRTDOM 

CRTENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING  A  NEW 

ENTITY  CLASS. 

CRTMOD  -  CONTROL  THE  PROCESSING  LOGIC  IF  CREATING  A 

MODEL  WITHIN  THE  SYSTE 

CRTREL  -  CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING 

A  NEW  RELATION  CLA 

CRTVIEW  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  CREATE 

VIEW  COMMAND. 

DEFAREA  -  PROCESSES  THE  AREA  INFORMATION  IF  THE  DBMS  IS 

IDS-II.  IDMS  AND  VA 

DEFCODL  -  PROCESSES  THE  DBMS  TYPES:  VAX-11.  IDMS.  IDS-II. 

DEFDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 

DEFFLD  -  PROCESSES  THE  FIELD  INFORMATION  FOR  THE  DEFINE 

RECORD  COMMAND. 

DEFIMS  -  PROCESSES  THE  DBMS  TYPE:  IMS. 

DEFIMSS  -  PROCESSES  THE  SEGMENT  INFORMATION  IF  THE  DBMS 
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t  V 


•  Vl* 


'm* , 


IS  IMS. 

DEFKEY  -  PROCESSES  THE  KEY  INFORMATION  FOR  THE  DEFINE 

RECORD  COMMAND. 

DEFORCL  -  PROCESSES  THE  DBMS  TYPE:  ORACLE. 

DEFSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DEFINE 

SET  COMMAND. 

DEFTOT  -  PROCESSES  THE  DBMS  TYPE:  TOTAL. 

DRPAC  -  DELETE  OWNED  ATTRIBUTES  ASSOCIATED  WITH  ENTITY 

DRPALI  -  DROP  THE  ALIAS  FOR  AN  ENTITY  OR  ATTRIBUTE. 

DRPATT  -  CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 

DRPDOM  -  PROGRAM  NAME 

DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES . 

DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 

DRPKC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP  KEY 

CLASS" . 

DRPKW  -  DROP  A  KEYWORD  ASSOCIATION  FROM  EITHER  AN 

ATTRIBUTE, ENTITY  OR  REL 

DRPKWC  -  OBTAIN  THE  USED  IDENTIFIED  KEYWORD,  THEN  DROP 

THEIR  ASSOCIATIONS. 

DRPMIG  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP 

MIGRATES"  CLAUSE. 

DRPMOD  -  CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A  MODEL. 

DRPREL  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP 

RELATION"  COMMAND. 

DRPSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  FROM  THE  DATABAS 

DRPVIEW  -  DROP  THE  VIEW. 

EXCFLAG  -  DETERMINE  IF  KEYWORDS .ALIASES .DESCR  ARE  TO  BE 

EXCLUDED 

GETDBST  -  RETURN  INFORMATION  ABOUT  THE  CURRENT  SESSIONS' 

DATABASE 

GETDRT  -  FETCH  DATA  BASE,  RECORD  TYPE  INFO  FROM  PARSER 

LISTS 

GETRDH  -  RETURN  WITH  CURRENT  SESSIONS'  DATA  BASE  INFO 

MKRNLST  -  FETCH  LIST  OF  RENAME  PAIRS  FOR 

MIGRATES . . SET . . CLAUSE 

MRGMOD  -  MERGE  TWO  IDEF  MODELS  INTO  ONE 

PROCDT  -  PROGRAM  NAME 

RENAME  -  UPDATE  EXISTING  OBJECT  NAME  WITH  NEW  OBJECT  NAME 

ADDMAP  -  ADD  A  CS-IS  MAPPING 

ALTATT  -  THE  ALTER  ATTRIBUTE  COMMAND  PROCESSOR  ALTERS 

ALTMAP  -  ALTER  MAP  COMMAND  PROCESSOR 
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CHGDOM 

CPYDES 

CRTMAP 

DESCRB 

DRPMAP 

HALT 

TXTTYP 


USED  IN  MAIN 


NDDL/MAIN 


-  CHANGE  THE  DOMAIN  FOR  AN  ALTERED  ATTRIBUTE 

-  COMMAND  PROCESSOR  FOR  COPT  DESCRIPTION 

-  CREATE  MAP  COMMAND  PROCESSOR 

-  COMMAND  PROCESSOR  FOR  THE  NDDL  DESCRIBE  COMMAND 

-  COMMAND  PROCESSOR  FOR  THE  DROP  MAP  COMMAND 

-  HALT  WITH  'COMMIT'  OR  'ROLLBACK'. 

-  DETERMINE  SOURCE  OF  DESCRIPTION  TEXT 


PROGRAM(S) : 

-  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


CPFVAL 

RETURN  THE  COUNTER  OF  LIST1  BASED  ON  ROW 
IN  LIST2 
C 

FUNCTION 
I  NT  () 

CPF 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  CPFVAL(LIST1 ,  LIST2,  VALUE) 

COBOL  —  CALL  -CPFVAL"  USING 


LIST1 , 

LIST2, 

VALUE . 

FORTRAN 

CALL  CPFVAL(LIST1 ,  LIST2,  VAL) 

INPUT: 

LIST1  --  THE  LIST  CONTAINING  THE  COUNTER. 

LIST2  —  THE  LIST  WHOSE  CURRENT  ROW  WILL 

BE  USED  AS  THE  INDEX  INTO  LIST1 . 

OUTPUT: 
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VALUE 


—  AN  INTEGER  REPRESENTING  THE  COUNTER  THAT 

WAS  KEPT  IN  LIST1 . 


DESCRIPTION 


ACCESS  THE  FIRST  ITEM  FROM  THE  ROW  OF  LIST1 
CORRESPONDING  TO  THE  CURRENT  ROW  OF  LIST2 . 


ARGUMENTS : 


LIST1  - 
LIST2  « 
VALUE  - 


I  NT  » 
I  NT  • 
I  NT  • 


INCLUDE  FILES: 


LISTS 

NDDL 


-  PROVIDES  THE  DIMENSIONS  OF  THE  NDDL  LISTS 

-  *»**  PURPOSE  NOT  FOUND  BY  STRIPPER 


CALLED  DIRECTLY  BY: 


ADDKC 


DEFKEY 


-  CONTROLS  PROCESS  FOR  KEY  CLASS  CLAUSE  FOR 

CREATE /ALTER  ENTITY 

-  PROCESSES  THE  KEY  INFORMATION  FOR  THE  DEFINE 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S) 


NDDL/ MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  CPYDES 

PURPOSE:  COMMAND  PROCESSOR  FOR  COPT  DESCRIPTION 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE :  CPYDES 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  CPYDES (^CURRENTMODELNO) 

COBOL  ~  CALL  "CPYDES"  USING 

CURRENTMODELNO . 

FORTRAN  —  CALL  CPYDES ( CURRENTMODELNO ) 


INPUT: 

I NT  "CURRENTMODELNO  ; 
OUTPUT : 


DESCRPIPTION : 

THIS  IS  A  PARTIAL  DESCRIPTION  COPY.  ONLY  THE  DESCRIPTION 
LINES  OF  THE 

IDENTIFIED  DESCRIPTION  TYPE  OF  THE  GIVEN  OBJECT  WILL  BE 
COPIED,  RATHER 
THAN  ALL  DESCRIPTION  TYPES. 

ARGUMENTS : 


CURRENT  MODEL  NO  -  I NT  * 


INCLUDE  FILES: 
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LISTID  -  PROVIDES  LIST  OF  PARSED  OBJECTS 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VEROBJ  -  VERIFY  THAT  THE  OBJECT  EXISTS. 

VERDSTX  -  VERIFY  THE  EXISTENCE  OF  DESC.  TEXT  FOR  A  GIVEN 

OBJECT 

VERDSTP  -  VALIDATE  A  USER  ENTERED  DESCRIPTION  TYPE 

VERMOD  -  verify  the  existence  of  a  model  and  return  the 

unique  number. 

SPRINTF 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
WRTDSC4  -  SELECT  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST : 


CPYMOD 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
COPY  MODEL  COMMAND. 

VAX-11  COBOL 
SUBROUTINE 
CPYMOD 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  MODEL  COMMAND. 
GENERATES  ALL  THE  NDDL  STATEMENTS  NECESSARY  TO  POPULATE 
THE  TARGET  MODEL  WITH  THE  ATTRIBUTES,  ENTITIES.  RELATIONS, 
KEY  CLASSES,  KEYWORDS,  ALIASES  AND  DESCRIPTIONS  CONTAINED 
IN  THE  FROM-MODEL. 


ARE  TO  BE  COPIED. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9)] 
MOD-NAME  -  DSPLY  [X(30)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

RCDEPKC  -  LIST  OF  KEYS  MIGRATED  VIA  A  RELATION 

CHKMODL  -  DETERMINE  IF  CURRENT  MODEL  EXISTS  FOR  A  SESSION 
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ROUTINES  CALLED: 


CPFONE 

UERROR 

VERMOD 

CPFNXT 

OPNFIL 

EXCFLAG 

ADDPARM 

ALLATT 

ALLENT 

BLKCLST 

TOPNODE 

ALLREL 

CLSFIL 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

verify  the  existence  of  a  model  and  return  the 
unique  number . 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

DETERMINE  IF  KEYWORDS , ALIASES , DESCR  ARE  TO  BE 
EXCLUDED 

WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS /DELIMITER 

SELECT  ALL  THE  ATTRIBUTES  IN  FROM-MODEL  AND 
GENERATE 

SELECT  ALL  THE  ATTRIBUTES  IN  FROM-MODEL  AND 
GENERATE 

SELECT  AND  STORE  KEY  CLASS  INFO  FOR  A  GIVEN 
ENTITY 

SELECT  ALL  THE  LEVEL  1  TOP  NODE  INDEPENDENT 
ENTITY 

FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL 
GENERATE 

THIS  ROUTINE  CLOSES  AN  OUTPUT  FILE.  THE  FILE 
WILL 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 


LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


CRTALI 

CREATES  ALIASES  FOR  AN  ENTITY  OR 
ATTRIBUTE. 

VAX- 11  COBOL 
SUBROUTINE 
CRTALI 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


CREATES  ALIASES  FOR  AN  ENTITY  OR  ATTRIBUTE 


DEPENDING  ON  WHETHER  AN  ENTITY  OR 
ATTRIBUTE  HAS  BE  CREATED,  VERIFY  THAT 
IT  EXISTS.  AND  THEN  INSERT  THE  ALIAS. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERENT 

UERROR 

VERATT 

CPFNXT 

UWARN 

INSECNM 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 
VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 
MODEL 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  CLASS  IN  A 
MODEL 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
INSERT  A  RECORD  INTO  ENTIYT  NAME 
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INSACNM  -  INSERT  A  RECORD  INTO  ATTR I BUTE_N AM E 
CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  CRT ATT 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR 

CREATING  AN  ATTRIBUTE. 

LANGUAGE :  VAX- 1 1  COBOL 

MODULE  TYPE :  SUBROUTINE 

SOURCE  FILE :  CRT ATT 

SOURCE  FILE  TYPE:  .COB 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  CREATING 
AN  ATTRIBUTE  AND  IT  RELATED  DATA  IN  A  MODEL. 
ONLY  A  SINGLE  ATTRIBUTE  HAVING  ONE  DOMAIN  IS 
IS  CREATED.  A  KEYWORD  LIST  MAY  OR  MAY  NOT  BE 
SPECIFIED  FOR  THE  ATTRIBUTE. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9>] 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
LISTNOS  -  VALID  LIST  NUMBERS 

CHKMODL  -  DETERMINE  IF  CURRENT  MODEL  EXISTS  FOR  A  SESSION 


ROUTINES  CALLED: 


UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

VERDOM  -  VERIFY  THE  EXISTENCE  OF  A  DOMAIN  CLASS  IN  THE 

CDM 

BLDATT  -  CREATE  ATT  CLASS  AND  ATT  NAME  FOR  A 

MODEL (CREATE /COPY  ATT) 

INSACNM  -  INSERT  A  RECORD  INTO  ATTRIBUTE  NAME 
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ADDKW  -  ADDS  KEYWORDS  FOR  COMMANDS  USING  ‘ADD 

KEYWORD" (OPTIONAL) 

CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CRTDOM 

PROGRAM  NAME  CRTDOM 

VAX-11  COBOL 

PROGRAM 

CRTDOM 

•  COB 

CDM 

PS41100 


DESCRIPTION: 


GIVEN  A  DOMAIN  NAME  VERIFY  THAT  THE  DOMAIN  DOES 
NOT  ALREADY  EXIST,  AND  INSERT  THE  DOMAIN  AND  A 
DATA  TYPE  CLAUSE 


OBTAIN  THE  DOMAIN  NAME,  VERIFY  THAT 
IT  DID  NOT  PREVIOUSLY  EXIST,  FETCH  AN 
UNIQUE  DOMAIN  NUMBER,  AND  INSERT.  ALSO 
ADD  THE  DATE  TYPE  CLAUSE. 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VERDOM 

UERROR 

GETNNUM 

INSDOM 

PROCDT 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THE  EXISTENCE  OF  A  DOMAIN  CLASS  IN  THE 
CDM 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

INSERT  A  RECORD  INTO  DOMAINCLASS 
PROGRAM  NAME 


CALLED  DIRECTLY  BY : 
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BRANCHR  -  PERFORMS  MULTI -WAT  CALL  TO  THE 
USED  IN  MAIM  PROGRAM(S) : 

MDDL/MAIM  -  MAIM  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 


3-331 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


CRTENT 

CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING 

A  NEW  ENTITY  CLAS 

VAX- 11  COBOL 

SUBROUTINE 

CRTENT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING  A  NEW 
ENTITY  CLASS  AND  RELATED  DATA  IN  A  MODEL. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  tS9(9)] 
EC-NO  -  DSPLY  [S9(9) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 

CHKMODL 


UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
VALID  LIST  NUMBERS 

DETERMINE  IF  CURRENT  MODEL  EXISTS  FOR  A  SESSION 


ROUTINES  CALLED: 


UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

VERENT  -  VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 

MODEL 


GETNNUM 

INSEC  -  INSERT  A  RECORD  INTO  ENTITY_CLASS 

INSECNM  -  INSERT  A  RECORD  INTO  ENTIYT  NAME 
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ADDATT  -  ASSOCIATES  EXISTING  ATT  WITH  ENTITY  IN  CREAT 

ENTITY  COMMAND 

ADDKC  -  CONTROLS  PROCESS  FOR  KEY  CLASS  CLAUSE  FOR 

CREATE/ALTER  ENTITY 

ADDKW  -  ADDS  KEYWORDS  FOR  COMMANDS  USING  "ADD 

KEYWORD" (OPTIONAL) 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CRTMAP 

CREATE  MAP  COMMAND  PROCESSOR 
C 

FUNCTION 
I  NT  () 

CRTMAP 

.C 

CDM 

PS41100 


DESCRIPTION: 

SYNOPSIS 

C 

COBOL 


CRTMAP 

CALL  CRTMAP 


FORTRAN  —  CALL  CRTMAP 


INPUT: 


OUTPUT: 


DESCRIPTION 

CRTMAP  IS  THE  COMMAND  PROCESSOR  FOR  THE  CREATE  MAP 
COMMAND .  IT 

VERIFIES  THAT  EITHER  THE  AUC  NAME  OR  THE  EC  RC  EC  NAMES 
ARE  VALID 

AND  THEN  CALLS  ADDMAP  TO  ADD  THE  MAP. 
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INCLUDE  PILES: 


STDTTP  -  STANDARD  TYPE  DEFINITIONS 
LISTID  -  PROVIDES  LIST  OF  PARSED  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VERENT 

SPRINTF 
U ERROR 
ADDMAP 
CPFNXT 
VERREL 

VERAUC 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 
MODEL 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ADD  A  CS-IS  MAPPING 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

VERIFY  THE  DEPENDENT  AND  INDEPENDENT  ENTITIES 
IN  THE  RELATION 

VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  USE  CLASS 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


CRTMOD 

CONTROL  THE  PROCESSING  LOGIC  IF  CREATING 

A  MODEL  WITHIN  THE 

VAX- 11  COBOL 

SUBROUTINE 

CRTMOD 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THE  CREATE  MODEL  COMMAND  PROCESSOR  WILL 

CONTROL  THE  PROCESSING  LOGIC  IF  CREATING 
A  MODEL  WITHIN  THE  SYSTEM 


ARGUMENTS : 


CURRENT-MODEL-NO  -  DSPLY  [S9(9)J 
CUR-MOD-NAME  -  DSPLY  [X(30)] 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

VERMOD 

UERROR 

GETNNUM 

INSMOD 

UWARN 

ERRPRO 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
verify  the  existence  of  a  model  and  return  the 
unique  number. 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

INSERT  A  RECORD  INTO  MODEL_CLASS 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
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CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI -WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


CRTREL 

CONTROLS  THE  LOGIC  FOR  VALIDATING  AND 

CREATING  A  NEW  RELATI 

VAX- 11  COBOL 

SUBROUTINE 

CRTREL 

.COB 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING 
A  NEW  RELATION  CLASS  WITHIN  A  MODEL.  CREATE 
RELATION  COMMAND  CONSISTS  OF  A  RELATION  CLASS 
CLAUSE.  AN  OPTIONAL  MIGRATES  CLAUSE  AND  AN 
OPTIONAL  KEYWORD  CLAUSE. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  tS9(9)] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 

CHKMODL 


UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
VALID  LIST  NUMBERS 

DETERMINE  IF  CURRENT  MODEL  EXISTS  FOR  A  SESSION 


ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

VERREL 

GETNNUM 


ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

VERIFY  THE  DEPENDENT  AND  INDEPENDENT  ENTITIES 
IN  THE  RELATION 
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CHXCARD 

INSRC 

ADDMIG 

ADDKW 


-  OBTAINS  THE  USER-SPECIFIED  CARDINALTY  (IF  ANY) 

FOR  THE  RELATION. 

-  INSERT  A  RECORD  INTO  RELATIONCLASS 

-  PROCESS  THE  ADD  MIGRATES. . .SET. .CLAUSE 

-  ADDS  KEYWORDS  FOR  COMMANDS  USING  "ADD 

KEYWORD" (OPTIONAL) 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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!  NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CRTVIEW 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
CREATE  VIEW  COMMAND. 

VAX- 11  COBOL 
PROGRAM 
CRTVIEW 
.COB 

CDM 

PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR 
THE  CREATE  VIEW  COMMAND 

EXTRACT  A  VIEW-NAME,  VERIFY  THAT  IT  DOES 
EXIST;  THN  FETCH  A  UNIQUE  VIEW  NO. 

FROM  THE  REUSABLE  POOL  AND 
INSERT  THE  VIEW  - 

THEN  PROCESS  THE  REMAINDER  OF  THE 
VIEW  COMMAND. 


INCLUDE  FILES: 


LISTNOS 

UNIQENO 

VWFROM 

VWRETR 

VWDI 

VWRC 


VALID  LIST  NUMBERS 

UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

LIST  OF  ENTITIES  SPECIFIED  IN  A  VIEW 

LIST  OF  ENTITIES  AND  TAGS  SPECIFIED  IN  A  VIEW 

LIST  OF  DATA  ITEMS  IN  A  VIEW 

LIST  OF  RELATION  CLASSES  INHERENT  TO  A  VIEW 


ROUTINES  CALLED: 


CPFONE 

VERVIEW 

UERROR 

GETNNUM 

INSSEC 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
verify  the  existence  of  a  view  in  the  system. 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

INSERT  A  RECORD  INTO  SEC 


BLVWLST 

REMVIEW 
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-  CREATE  BUILD  VIEW  LISTS  FOR  THE  CREATE  VIEW 

COMMAND 

-  POPULATE  VIEW  DEFINITION  AND  ES-CS-MAPPING 


RH 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


v>; 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFAREA 

PROCESSES  THE  AREA  INFORMATION  IF  THE 

DBMS  IS  IDS-II ,  IDMS 

VAX- 11  COBOL 

SUBROUTINE 

DEFAREA 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  AREA  INFORMATION  IF  THE  DBMS  IS 
IDS-II,  IDMS  AND  VAX-11. 


ARGUMENTS : 


DB-ID  -  DSPLY  [ S9(9) ] 
RT-ID  -  DSPLY  [X(30) 3 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

VERAREA 

UERROR 

INSDAA 

CPFNXT 

ERRPRO 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THE  EXISTENCE  OF  AN  AREA  FOR  A  DATA  BASE 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
INSERT  A  RECORD  INTO  THE  DB_AREA_ASSIGNMENT 
ENTITY.  IF 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 
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CALLED  DIRECTLY  BY: 

DEFREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

RECORD  FOR  THE  SYSTE 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/KAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION : 


DEFCODL 

PROCESSES  THE  DBMS 
IDS-II. 

VAX- 11  COBOL 
SUBROUTINE 
DEFCODL 
.COB 

CDM 

PS41100 


TYPES:  VAX-11,  IDMS. 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPES: 
VAX- 11 
IDMS 
IDS-II 


First,  extract  the  schema,  subschema  and  area  names.  After 

verifying  that  the  area  name  does  not  exist, 

insert  into  the  cdm.  Repeat  till  no  more  area  names. 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) ] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
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UERROR 

CPFNXT 

INSSCH 

VERAREA 

UWARN 

INSAREA 

ERRPRO 


ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ACCESS  THE  NEXT  TOKEM  IH  A  PARSER  LIST. 

INSERT  A  RECORD  INTO  THE  SCHEMANAMES  ENTITY. 

IF 

VERIFY  THE  EXISTENCE  OF  AN  AREA  FOR  A  DATA  BASE 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
INSERT  A  RECORD  INTO  THE  DATABASE  AREA  ENTITY. 
IF 


CALLED  DIRECTLY  BY: 


DEFDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-345 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFDB 

CONTROLS  THE  PROCESSING  LOGIC  FOR 

DEFINING  A  DATABASE  TO  TH 

VAX- 11  COBOL 

PROGRAM 

DEFDB 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

! 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 
DATABASE  TO  THE  SYSTEM. 


extract  the  dbms  type  .data  base  name  and  host  id 
from  the  parser  lists. 

After  verifying  that  the  data  base  does  not 

already  exist,  insert  it  into  the  CDM.  Now  process  the  DBMS 
type  depending  on  whether  it  is  Total,  IMS,  ORACLE,  VAX-11, 
IDMS  or  IDS-II . 


INCLUDE  FILES: 


LISTNOS 

UNIQENO 

ERRPRO 


VALID  LIST  NUMBERS 

UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

LOWUPP  -  CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 

VERDB  -  VERIFY  THE  EXISTENCE  OF  A  DATA  BASE  IN  THE  CDM 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
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GETNNUM 

INSDB 

DEFORCL 

DEFTOT 

DEFIMS 

DEFCODL 

CHGLOBL 

ERRPRO 


INSERT  A  RECORD  INTO  THE  DATABASE  ENTITY.  IF 
PROCESSES  THE  DBMS  TYPE:  ORACLE. 

PROCESSES  THE  DBMS  TYPE:  TOTAL. 

PROCESSES  THE  DBMS  TYPE:  IMS. 

PROCESSES  THE  DBMS  TYPES:  VAX-11.  IDMS.  IDS-II. 
CHANGES  THE  GLOBAL  DB  PARAMETERS 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S): 

NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFFLD 

PROCESSES  THE  FIELD  INFORMATION  FOR  THE 

DEFINE  RECORD  COMMA 

VAX- 11  COBOL 

SUBROUTINE 

DEFFLD 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  FIELD  INFORMATION  FOR  THE  DEFINE 
RECORD  COMMAND. 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) ] 
RT-ID  -  DSPLY  [X(30) ] 

DBMS -NAME  -  DSPLY  [X(30)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

CPFCOR 

LOWUPP 

INSDFLD 

UERROR 

INSSDFL 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ACCESS  A  TOKEN  IN  A  CORRESPONDING  NAMED  LIST 
CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 
INSERT  A  RECORD  INTO  THE  DATA_FIELD  ENTITY. 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
INSERT  A  RECORD  INTO  THE  SEGMENT  DATA  FIELD 
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ENTITY.  IF 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

ERRPRO 


CALLED  DIRECTLY  BY: 


DEFREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

RECORD  FOR  THE  SYSTE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 

i 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFIMS 

PROCESSES  THE  DBMS  TYPE: 

VAX- 11  COBOL 

SUBROUTINE 

DEFIMS 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


IMS. 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPE:  IMS 


First  extract  the  PSB  sequence  number,  key  feedback  length, 

and  PSB  name  from  the  parser  lists.  After  verifying 

that  the  psb  name  does  not  previously  exist, 

insert  into  PSB  and 

PSB  PCB. 


ARGUMENTS : 


DB-ID  -  DSPLY  [ S9(9) ] 

HOST- ID  -  DSPLY  [X(30)] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 
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VERPSB  -  VERIFIES  THE  EX I STANCE  OF  A  PROGRAM  STATUS 

BLOCK  FOR  AN  IMS  DATAB 

•'  INSPSB  -  INSERT  A  RECORD  INTO  THE  PSB  ENTITY.  IF 

INSPCB  -  INSERT  A  RECORD  INTO  THE  PSBPCB  ENTITY.  IF 
ERRPRO 


CALLED  DIRECTLY  BY: 


DEFDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Document at i on 


NAME: 
PURPOSE : 


LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DEFIMSS 

PROCESSES  THE  SEGMENT  INFORMATION  IF  THE 
DBMS  IS  IMS. 

VAX- 11  COBOL 
SUBROUTINE 
DEFIMSS 
.COB 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  SEGMENT  INFORMATION  IF  THE  DBMS 
IS  IMS. 


ARGUMENTS : 


DB-ID  *  DSPLY  [ S9(9) ] 
RT-ID  -  DSPLY  [X( 30) ] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 
U ERROR 
INSISS 

ERRPRO 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
INSERT  A  RECORD  INTO  THE  IMSSEGMENTSIZE 
ENTITY.  IF 
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CALLED  DIRECTLY  BY: 


DEFREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

RECORD  FOR  THE  SYSTE 

USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GRO 


DEFKEY 

PROCESSES  THE 

DEFINE  RECORD 

VAX- 11  COBOL 

SUBROUTINE 

DEFKEY 

.COB 

CDM 

:  PS41100 


KEY  INFORMATION  FOR  THE 
COMMAND 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  KEY  INFORMATION  FOR  THE  DEFINE 
RECORD  COMMAND. 


ARGUMENTS : 


DB-ID  -  DSPLY  [ S9(9) ] 
RT-ID  =  DSPLY  [X( 30) 3 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

CPFCOR 

VERRK 

U ERROR 

INSRKEY 

CPFVAL 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ACCESS  A  TOKEN  IN  A  CORRESPONDING  NAMED  LIST 
verifies  the  existance  of  a  key  for  a  record. 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
INSERT  A  RECORD  INTO  THE  RECORDKEY  ENTITY.  IF 
RETURN  THE  COUNTER  OF  LIST1  BASED  ON  ROW  IN 
LIST2 
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.* 


CPFNXT 

VERRKM 

INSRKM 

ERRPRO 


-  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

-  verifies  the  existance  of  a  data  field  for  a 

record. 

-  INSERT  A  RECORD  INTO  THE  RECORDKEY  MEMBER 

ENTITY.  IF 


CALLED  DIRECTLY  BY: 


DEFREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

RECORD  FOR  THE  SYSTE 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFORCL 

PROCESSES  THE  DBMS  TYPE:  ORACLE. 

VAX- 11  COBOL 

SUBROUTINE 

DEFORCL 

-COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

THIS  ROUTINE  PROCESSES  THE  DBMS  TYPE:  ORACLE 

Extract  the  password  from  the  parser  lists,  then  insert  the 
oracle  database  id  and  password. 

ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) ] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 

J 

ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

INSPWRD  -  INSERT  A  RECORD  INTO  THE  DBPASSWORD.  IF 

SUCCESSFUL, 


ERRPRO 
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CALLED  DIRECTLY  BY: 


DEFDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


'll 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFREC 

CONTROLS  THE  PROCESSING  LOGIC  FOR 

DEFINING  A  RECORD  FOR  THE 

VAX- 11  COBOL 

PROGRAM 

DEFREC 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 
RECORD  FOR  THE  SYSTEM. 


AFTER  EXTRACTING  THE  DB-ID  AND  RT-ID,  VERIFY  THAT  THE  RECORD 
TYPE  DID  NOT  PREVIOUSLY  EXIST.  IF  IT  DID  NOT,  PROCESS  THE 
AREA  INFORMATION,  IMS  SEGMENT  INFORMATION,  FIELD  INFORMATION 
AND  KEY  INFORMATION. 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


GETRDH 

UERROR 

VERRT 

INSRTYP 

DEFAREA 

DEFIMSS 


RETURN  WITH  CURRENT  SESSIONS'  DATA  BASE  INFO 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
VERIFIES  THE  EXISTANCE  OF  A  RECORD  TYPE. 

INSERT  A  RECORD  INTO  THE  RECORDTYPE  ENTITY.  IF 
PROCESSES  THE  AREA  INFORMATION  IF  THE  DBMS  IS 
IDS-II,  IDMS  AND  VA 

PROCESSES  THE  SEGMENT  INFORMATION  IF  THE  DBMS 
IS  IMS. 
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DEFFLD 

DEFKEY 

ERRPRO 


PROCESSES  THE  FIELD  INFORMATION  FOR  THE  DEFINE 
RECORD  COMMAND. 

PROCESSES  THE  KEY  INFORMATION  FOR  THE  DEFINE 
RECORD  COMMAND. 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 


LANGUAGE: 

MODULE  TYPE: 

SOURCE  PILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DEFSET 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
DEFINE  SET  COMMAND. 

VAX- 11  COBOL 
PROGRAM 
DEFSET 
.COB 


CDM 

PS41100 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
DEFINE  SET  COMMAND. 

THE  FOLLOWING  DBMS  ARE  LEGAL  FOR  THIS  PROCESS: 
TOTAL.  IMS.  VAX-11.  IDMS .  IDS 

DBMS  RULES 

ORACLE  TOTAL  IMS  *  VAX- 11  IDMS  IDS 
*  CODASYL  DBMS'S  • 

RULE  * 


SETS 

NO 

YES 

YES 

YES 

YES 

YES 

EQUIRED/ 

PTIONAL 

NO 

NO 

NO 

YES 

YES 

YES 

OR  MEMBERS 

INKAGE/ 
ATA  FIELD 

NO 

YES 

NO 

NO 

NO 

MO 

INGLE 

EMBER 

LLOWED 

NO 

YES 

YES 

YES 

YES 

YES 

ULTIPLE 

EMBERS 

NO 

NO 

NO 

YES 

YES 

YES 

LLOWED 
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INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


GETDBST 

UERROR 

VERRSET 

CPFONE 

VERRT 

CPFNXT 

INSSTM 

GETNNUM 

INSRSET 

VERDFLD 

INSDSL 

CPFCOR 

LOWUPP 


RETURN  INFORMATION  ABOUT  THE  CURRENT  SESSIONS' 
DATABASE 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
VERIFIES  THE  EXI STANCE  OF  A  SET. 

EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFIES  THE  EXISTANCE  OF  A  RECORD  TYPE. 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

INSERT  A  RECORD  INTO  THE  SET_TYPE_MEMBER 
ENTITY.  IF 

INSERT  A  RECORD  INTO  THE  RECORDSET  ENTITY.  IF 
VERIFIES  THE  EXISTENCE  OF  A  DATA  FIELD  FOR  A 
GIVEN  DATA  BASE 

INSERT  A  RECORD  INTO  THE  DFSETL I NKAGE  ENTITY. 
IF 

ACCESS  A  TOKEN  IN  A  CORRESPONDING  NAMED  LIST 
CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEFTOT 

PROCESSES  THE  DBMS  TYPE: 

VAX-11  COBOL 

SUBROUTINE 

DEFTOT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


TOTAL. 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPE:  TOTAL 


Extract  the  first  file  name  from  the  parser  lists.  Then, 
after  verifying  that  the  file  does  not  previously  exist, 
insert  the  Total  DBID  and  file  nam  into  the  CDM.  Now, 
repeat  process  till  no  more  file  names. 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) ] 
RETURN-STATUS  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

UERROR 

VERAREA 

INSAREA 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
VERIFY  THE  EXISTENCE  OF  AN  AREA  FOR  A  DATA  BASE 
INSERT  A  RECORD  INTO  THE  DATA  BASE  AREA  ENTITY. 
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IF 

CPFHXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 
ERRPRO 


CALLED  DIRECTLY  BY: 


DEFDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME:  DELI PDF 

PURPOSE:  DELETE  A  RECORD  FROM  PRO JECT_DATA_F I ELD 

ENITY 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I  NT  () 

SOURCE  FILE:  DELI PDF 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELI  PDF ( ©DB_ID ,  RT__ID ,  DF_ID .  TAG_NO , 

©STATUS) 

COBOL  —  CALL  "DELPDFT"  USING 

DB-ID, 

RT-ID, 

DF-ID, 

TAG-NO . 

STATUS . 

FORTRAN  —  CALL  DELPDFT(DBID, RTID. DFID, TAGNO . STATUS ) 


INPUT: 

I NT  *DB_ID  ; 
CHAR  *RT_ID  ; 
CHAR  *DF_ID  ; 

I NT  *  TAG_NO  ; 
CHAR  *RT_ID  : 

OUTPUT : 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
PROJECT  DATA  FIELD,  IF  SUCCESSFULLY  DELETED  THE  RCORD  , 
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THE  STATUS 

AMD  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1 . 
ARGUMENTS : 


DB_ID  - 
RTID  - 
DF  ID  - 
TAG_NO 
STATUS 


ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


PDFDB  -  RETRIEVES  PROJECT  DATA  FIELDS  FOR  A  GIVEN  DATA 

BASE 

PDFDF  -  RETRIVES  ALL  THE  PROJ  DATA  FIELD  OR  DF  BEING 

DROPPED 

PDFREC  -  RETRIEVES  ALL  PORJECT  DATA  FIELDS  FOR  A  GIVEN 

RECORD 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


I  NT  • 
CHAR  • 
CHAR  * 
I  NT  * 
I  NT  * 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WHERE  AC  NO  -  "INPUT  PARAMETER  1*  ; 


SYNOPSIS 

C  —  DELAC ( 0 AC_NO , ©STATUS ) 


DELAC 

DELETE  A  RECORD  FROM  ATTRIBUTECLASS 
C 

FUNCTION 
I  NT  () 

DELAC 

-C 

CDM 

PS41100 


COBOL 


CALL  "DELAC" 


USING 

AC-NO, 

STATUS 


FORTRAN  --  CALL  DELAC (ACNO , STATUS) 


INPUT: 

INT  *  AC_NO  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ATTRI BUTECLASS 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


ARGUMENTS : 
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ACNO  -  I NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


OOSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPATT  -  CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

FNDACM  -  DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELACAL 

PURPOSE:  DELETE  RECORD  CLASS  FROM  ATTRIBUTENAME 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELACAL 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


WHERE  AC_NAME  - :  “INPUT  PARAMETER  1  "  AND 
AC_NO  :■=  “INPUT  PARAMETER  2“  ; 

SYNOPSIS 

C  —  DELACAL (AC_NAME ,  SACNO ,  ©STATUS) 

COBOL  —  CALL  “DELACAL"  USING 

AC-NAME . 

AC-NO . 

STATUS . 

FORTRAN  —  CALL  DELACAL ( ACNAME , ACNO , STATUS ) 


INPUT : 

CHAR  *AC_NAME  ; 
INT  * AC_NO  ; 

OUTPUT : 

INT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ATTRIBUTE_NAME 

WHERE  AC_NAME  EQUALS  TO  "INPUT  PARAMETER  1"  AND  AC_NO 
EQUALS 

TO  "INPUT  PARAMETER  2". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
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WILL  BE  0  .  OTHERWISE  -1 . 
ARGUMENTS : 


ACNAME  -  CHAR  * 

AC  NO  -  I  NT  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


GETACAL  -  VERIFY  THE  EXISTANCE  OF  AN  ALIAS  FOR  AN 

ATTRIBUTE 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DELACKW 

DELETE  A  RECORD  FROM  ACKEYWORD 
C 

FUNCTION 
I  NT  () 

DELACKW 

.C 

CDM 

PS41100 


DESCRIPTION: 


WHERE  AC  NO  -  “INPUT  PARAMETER  1"  ; 


SYNOPSIS 

C  —  DELACKW ( BAC_NO , SSTATUS ) 

COBOL  —  CALL  "DELACKW"  USING 

AC-NO , 
STATUS . 

FORTRAN  —  CALL  DELACKW (ACNO , STATUS ) 


INPUT: 

INT  * AC_NO  ; 
OUTPUT : 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ACKEYWORD 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 
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ACNO  -  I NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


00SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE  > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPATT  -  GONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

FNDACM  -  DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DELACNM 

DELETE  RECORD  CLASS 
WHERE  ACNO 
C 

FUNCTION 
I  NT  () 

DELACNM 

-C 

CDM 

PS41100 


FROM  ATTRIBUTE  NAME 


:-  "INPUT  PARAMETER"  ; 


SYNOPSIS 

C  —  DELACNM (  &ACNO ,  ff  STATUS ) 

COBOL  —  CALL  "DELACNM"  USING 

AC-NO, 
STATUS . 


FORTRAN  —  CALL  DELACNM ( ACNO , STATUS ) 


INPUT: 

INT  *  AC_NO  : 
OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ATTRIBUTE_NAME 

WHERE  AC_NO  EQUAL  TO  THE  INPUT  PARAMETER ( ACNO) . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 
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ACNO  -  I  NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPATT  -  CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

FNDACM  -  DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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Ml 


NAME :  DELASM 

PURPOSE :  DELETE  : 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTIO! 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE:  DELASM 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DELASM 

DELETE  FROM  ATTRIBUTE  USE  CLASS  MAPPING 
C 

FUNCTION 
I  NT  () 

DELASM 

.C 


DESCRIPTION: 


SYNOPSIS 

C 


WHERE  TAG  NO  -:  “INPUT  PARAMETER  1  ' 


DELASM  (TAG  NO,  .  €f  STATUS  ) 


: 


M 


COBOL 


FORTRAN 


CALL  “DELASM”  USING 

TAG-NO , 
STATUS . 

CALL  DELASM (TAGNO. STATUS) 


INPUT: 

INT  •▼AG  NO  ; 


H 

1*1 


OUTPUT: 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
AUC_ST_MAPP I NG 

WHERE  TAG_NO  EQUALS  TO  "INPUT  PARAMETER  1" 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1 . 

ARGUMENTS : 


TAG  NO 


i  , 
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STATUS  -  I NT  * 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 

CALLED  DIRECTLY  BY: 

DRPMAP  -  COMMAND  PROCESSOR  FOR  THE  DROP  MAP  COMMAND 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

C  —  DELASM1 ( BDB_ID , BSTATUS ) 

COBOL  —  CALL  "DELASM1"  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELASM1 (DBID, STATUS) 


DELASM1 

DELETE  A  RECORD  FROM  AUCSTMAPPING  ENITY 
C 

FUNCTION 
I  NT  () 

DELASM1 

.C 

CDM 

PS41100 


INPUT: 

I NT  *DB_ID  ; 

OUTPUT: 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
AUC_ST_MAPPING .  IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1 . 
ARGUMENTS : 


DB  ID 
STATUS 


INT  * 
INT  * 
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ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

OOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DELASM2 

DELETE  A  RECORD  FROM 
C 

FUNCTION 
I  NT  () 

DELASM2 

.C 

CDM 

PS41100 


AUC  ST  MAPPING  ENITY 


DESCRIPTION: 


SYNOPSIS 

C  —  DELASM2 ( UDBID ,  »SET_ID.  USTATUS) 

COBOL  —  CALL  “DELASM2"  USING 

DB-ID, 

SET-ID, 

STATUS . 

FORTRAN  —  CALL  DELASM2 ( DBID ,  SETID,  STATUS) 


INPUT: 

I NT  *DB_ID  ; 
CHAR  *SET_ID  ; 

OUTPUT: 

I NT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
AUC_ST_MAPPING 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  -  I NT  • 
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SETID  -  CHAR  * 

STATUS  -  I  NT  * 


ROUTINES  CALLED: 


OOSQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE* 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 

DRPSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  FROM  THE  DATABAS 

SELRSET  -  DELETE  ALL  ASSOCIATIONS  IN  THE  CDM  FOR  A  SET 

BEING  DROPPED 

SELSTM  -  DELETES  ALL  OWNER/ MEMBERS  OF  THE  RECORD  TYPE 

BEING  DROPPED 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME :  DELAUC 

PURPOSE :  DELETE  I NHER I TED_ ATTU S E , 

KEYCLASSMEMBER , 
LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELAUC 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


ATTRIBUTEUSECL  WHERE  THE  TAG  NUMBER 
EQUALS 

THE  INPUT  PARAMETER.  ALSO  DELETE 
AUCCOPY  XREF 

WHERE  THE  INPUT  PARAMETER  EQUALS 
TOAUCNO  OR 
FROM_AUC_NO . 

SYNOPSIS 

C  —  DELAUC  ( ©T AG_NO ,  ©STATUS ) 

COBOL  —  CALL  "DELAUC"  USING 

TAG-NO 
STATUS . 

FORTRAN  --  CALL  DELAUC  (TAGNO,  STATUS) 


INPUT : 

INT  *TAG_NO 
OUTPUT : 

INT  ‘STATUS 
DESCRIPTION 

THIS  ROUTINE  CALLS  ROUTINES  WHICH  DELETE  THE 
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INHERITED  ATTRIBUTE 

USE,  KEY  CLASS  MEMBER,  ATTRIBUTE  USE  CLASS  AND  THE 
ATTRIBUTE  USE 

CLASS  COPY  CROSS  REFERENCE  ENTITY  CLASSES  WHERE  THE 
TAG  NUMBERS 

MATCH.  THIS  ROUTINE  WILL  ALSO  DELETE  TEXTUAL 
DESCRIPTION  AND 

ADD  THE  REUSABLE  TAG-NO  BACK  TO  THE  CDM  FOR  THE  TAG-NO. 
ARGUMENTS : 


TAGNO  -  I NT  * 

STATUS  -  I NT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


DELIAUC  -  DELETE  A  REORD  FROM  INHERITEDATTUSE 
SPRINTF 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

DELAUCL  -  DELETE  A  RECORD  FROM  ATTRIBUTEUSECL 

DELAUCK  -  DELETE  ATTRIBUTE  USE  CLASS  KEY  MEMBER  GIVEN 


CALLED  DIRECTLY  BY: 


DELOAC  -  DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 

DLMDAUC  -  DELETE  ATTRIBUTE  USE  CLASSES  ASSOCIATED  WITH 

ENTITY 

FNDAUC  -  DELETE  ALL  ATTRIBUTE  USE  CLASSES  FOR  A  GIVEN 

ENTITY  CLASS 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE: 


LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELAUCK 

DELETE  ATTRIBUTE  USE  CLASS  KEY  MEMBER 

GIVEN 

C 

FUNCTION 
INT  () 

DELAUCK 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THE  TAG  NUMBER 

SYNOPSIS 

C  —  DELAUCK (©TAG_N0 ,  ©STATUS ) 

COBOL  —  CALL  "DELAUCK"  USING 

TAG-NO 
STATUS . 

FORTRAN  —  CALL  DELAUCK (TAGNO, STATUS) 


INPUT: 

INT  *TAG_NO 
OUTPUT : 

INT  ‘STATUS 
DESCRIPTION 

THIS  ROUTINE  CALLS  DELKCMT  TO  DELETE  KEY  CLASS  MEMBERS 
GIVEN 

A  TAG  NUMBER  FOLLOWED  BY  DELMIGK  WHICH  DELETES  ALL 
ATTRIBUTE 

USE  CLASSES  FORMED  FROM  A  MIGRATION  OF  THAT  TAG  NUMBER 
AND 
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ANY  MIGRATION  OF  THOSE  ATTRIBUTE  USE  CLASSES. 
ARGUMENTS : 


TAG_NO  -  INT  * 

STATUS  -  INT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 


ROUTINES  CALLED: 


DELKCMT  -  DELETE  A  RECORD  FROM  KEYCLASSMEMBER 
SPRINTF 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

DELMIGK  -  DELETE  MIGRATING  KEY  CLASS 

CALLED  DIRECTLY  BY: 

DELAUC  -  DELETE  INHERITED_ATT_USE ,  KEY_CLASS_MEMBER , 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME :  DELAUCL 

PURPOSE :  DELETE 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTIO 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELAUCL 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DELAUCL 

DELETE  A  RECORD  FROM  ATTRIBUTEUSECL 
C 

FUNCTION 
INT  () 

DELAUCL 

.C 


DESCRIPTION: 


SYNOPSIS 

C 


TAG  NO 


“INPUT  PARAMETER  1 


DELAUCL (UTAGNO ,  USTATUS) 

CALL  “DELAUCL"  USING 

TAG-NO. 
STATUS . 

CALL  DELAUCL (TAGNO. STATUS) 


COBOL 


FORTRAN 


INPUT : 

INT  *  TAG_NO  ; 

OUTPUT : 

INT  * STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ATTRIBUTEUSECL  WHERE  TAG_NO  EQUALS  TO  "INPUT 
PARAMETER  2 " . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


TAG  NO 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELCMPR 

DELETE  A  RECORD  FROM  COMPLETERELATION 
C 

FUNCTION 
I  NT  () 

DELCMPR 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

SYNOPSIS 

C 

COBOL 


WHERE  KC_NO  : -  "INPUT  PARAMETER  2"  ; 

DELCMPR (©KC_NO ,  ©STATUS ) 

CALL  "DELCMPR"  USING 

KC-NO . 

STATUS . 


FORTRAN  --  CALL  DELCMPR(KCNO , STATUS ) 


INPUT: 

I NT  *  KC_NO  ; 
OUTPUT : 

I NT  ‘STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
COMPLETERELATION  WHERE  KCNO  EQUALS  TO  "INPUT 
PARAMETER  1 " . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS 


ICC  NO  -  I  NT  • 
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STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELMDKC  -  DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS  FOR 

AN  ENTITY 

DRPKC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  “DROP  KEY 

CLASS' . 

DELMTKC  -  DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 


USED  IN  MAIN  PROGRAM(S) : 


NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WHERE  RCNO  :-  “INPUT  PARAMETER  1“  ; 

SYNOPSIS 

C  —  DELCPRC(BRC_NO.  €f STATUS ) 

COBOL  --  CALL  "DELCPRC*  USING 

RC-NO. 

STATUS . 

FORTRAN  --  CALL  DELCPRC ( RCNO . STATUS ) 


INPUT 

I  NT  *RC  NO  ; 
OUTPUT: 

I NT  • STATUS  ; 


DELCPRC 

DELETE  A  RECORD  FROM  COMPLETERELATION 
C 

FUNCTION 
I  NT  () 

DELCPRC 

-C 

CDM 

PS41100 


DESCRPI PTION 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
COMPLETE  RELATION  WHERE  RC  NO  EQUALS  TO  “INPUT 
PARAMETER  1 ' 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -I 

ARGUMENTS 


RC  NO  -  I  NT  ’ 
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STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPMIG  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 

MIGRATES"  CLAUSE. 

DRPREL  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 

RELATION"  COMMAND. 


USED  IN  MAIN  PROGRAM(S): 


"DROP 

"DROP 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


?  V 

'  «! 

1 

PS  620141100 

November  1985 

,  ‘  * 

V 

% 

HDDL  COMMAND  PROCESSOR  Module  Docuaentat ion 

NAME: 

DELDAA1 

V  f 

PURPOSE : 

DELETE  A  RECORD  FROM  DB  AREA 

ASSIGNMENT 

ENITY 

V 

LANGUAGE: 

C 

MODULE  TYPE: 

FUNCTION 

t 

FUNCTION  TYPE: 

INT  () 

SOURCE  FILE: 

DELDAA1 

v< 

SOURCE  FILE  TYPE: 

.C 

HOST: 

>y 

4V.1 

SUBSYSTEM : 

CDM 

SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

PS41100 

$ 

»v. 

DESCRIPTION: 

*>! 

SYNOPSIS 

$ 

C 

DELDAA 1 C »DB_I D , ^STATUS ) 

COBOL 

CALL  "DELDAA1 “  USING 

•St 

$ 

DB-ID. 

STATUS . 

'1*? 

y 

y 

FORTRAN 

CALL  DELDAA 1(DB ID, STATUS) 

♦ 

INPUT: 

# 

INT  *DB_ID  ; 

«' 

OUTPUT : 

INT  *  STATUS 

t 

DESCRPIPTION: 

THIS  ROUTINE 

USES  ORACLE  CALLS  TO  DELETE  A 

RECORD  FROM 

»• 

DB  AREA  ASSIGNMENT.  IF  SUCCESSFULLY  DELETED  THE  RECORD 

.  THE  STATUS 

4  f 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 

A 

ARGUMENTS : 

DB  ID  -  INT 

• 

STATUS  -  INT 

• 

- 
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ROUTINES  CALLED: 


00SQL3 
ERRRPT 
COEXEC 
GOBI NON 


-  ORACLE  ROUTINE 

-  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELDAA2 

DELETE  A  RECORD  FROM  DB_AREA_ ASSIGNMENT 

ENITY 

C 

FUNCTION 
I  NT  () 

DELDAA2 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELDAA2 ( VDB_ I D .  NRTID.  VSTATUS) 

COBOL  --  CALL  'DELDAA2"  USING 

DB-ID, 

RT-ID. 

STATUS . 

FORTRAN  --  CALL  DELDAA2(DBID.  RTID.  STATUS) 


INPUT: 

INT  *DB_ID  ; 
CHAR  *RT  ID  ; 

OUTPUT: 

INT  • STATUS  : 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DB  AREA  ASSIGNMENT.  IF  SUCCESSFULLY  DELETED  THE  RECORD 
.  THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 
ARGUMENTS : 


DB  ID  -  INT  * 


3-392 


PS  620141100 
1  November  1985 


RTID  -  CHAR  * 

STATUS  -  I  IT  * 


ROUTINES  CALLED: 


00SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIM  PROGRAM(S) : 


MDDL/HAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 

i  t 

1  November  1985 

• 

4 

NDDL  COMMAND  PROCESSOR  Module  Documentation 

NAME: 

DELDBA1 

P 

i 

PURPOSE : 

DELETE  A  RECORD  FROM  DATA  BASE  AREA  ENITY  J 

LANGUAGE : 

C 

V 

V 

V 

MODULE  TYPE: 

FUNCTION 

FUNCTION  TYPE: 

INT  () 

SOURCE  FILE: 

DELDBA1 

SOURCE  FILE  TYPE: 

.C 

>. 

HOST: 

SUBSYSTEM : 

CDM 

* 

SUBDIRECTORY : 

• 

DOCUMENTATION  GROUP: 

PS41100 

» 

DESCRIPTION: 

■< 

SYNOPSIS 

c 

DELDBA1 ( NDB_ID , 9STATUS ) 

COBOL 

CALL  "DELDBAl”  USING 

DB-ID, 

S 

STATUS . 

•, 

FORTRAN 

CALL  DELDBAl (DBID, STATUS ) 

» 

INPUT: 

s 

INT  *DB_ID  ; 

OUTPUT : 

INT  • STATUS 

* 

■» 

DESCRPIPTION : 

r 

THIS  ROUTINE 

USES  ORACLE  CALLS  TO  DELETE 

A  RECORD  FROM 

*’ 

DATA  BASE  AREA 

€ 

. 1 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE 

STATUS  AND 

— 

RETURN  VALUE  BOTH 

WILL  BE  0  .  OTHERWISE  -1. 

* 

ARGUMENTS : 

DB  ID  -  INT 

ft 

STATUS  -  INT 

• 

— 

3-394 

••••  >  i  v  v  v.yy 

*  *  | 
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ROUTINES  CALLED: 


COSQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DELDBDF 

DELETE  ALL  DATA  FIELD  ASSOCIATIONS  WITH 

THE  DATABASE 

VAX- 11  COBOL 

SUBROUTINE 

DELDBDF 

.PRC 

CDM 

PS41100 


DESCRIPTION: 


THIS  ROUTINE  WAS  DESIGNED  FOR  USE  WITH 


DRPDB  (DROP  DATA  BASE) 

THIS  ROUTINE  VERIFIES  THE  EXISTANCE  OF  A  DATA  FIELD, 

SELECT  A  DATA  FIELD  ONE  AT  A  TIME  IN  THE  NDML  LOOP, 
DELETES  THE  DATA  FIELD.  DELETES  THE  TEXTUAL  DESCRIPTION. 
AND  ADDS  THE  REUSABLE  NUMBER  BACK  IN  THE  CDM. 

IT  HAS  ONE  INPUT  PARAMETER  (DB-ID)  AND  ONE 
OUTPUT  PARAMETER  FOUND-STATUS  (0  GOOD  AND  -1 
AN  ERROR  HAS  OCCURRED.  ALL  ERRORS  ARE  COVERED 
BY  ERROR  STATEMENTS  IN  THE  ROUTINE. 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) ] 

FOUND- STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


PS  620141100 
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ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELDFL3  -  DELETE  A  RECORD  FROM  DATA_FIELD  ENITY 
UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ADDRNUM  -  ADD  A  AVAILABLE  MO  OF  A  POOL  MO  BACK  TO  NO 

LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
ERRPRO 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


MDDL/MAIM  -  MAIM  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1965 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


DELDBRT 

DELETE  ALL  RECORD  TYPE  ASSOCIATIONS  WITH 
THE  DATABASE 
VAX- 11  COBOL 
SUBROUTINE 
DELDBRT 
PRC 

CDM 

PS41 100 


DESCRIPTION 


THIS  ROUTINE  WAS  DESIGNED  FOR  USE  WITH 


DRPDB  (DROP  DATA  BASE) 

THIS  ROUTINE  VERIFIES  THE  EXISTANCE  OF  A  RECORD  TYPE. 

SELECT  A  RECORD  TYPE  ONE  AT  A  TIME  IN  THE  NDML  LOOP. 
DELETES  THE  RECORD  TYPE.  DELETES  THE  TEXTUAL  DESCRIPTION. 
AND  ADDS  THE  REUSABLE  NUMBER  BACK  IN  THE  CDM 

IT  HAS  ONE  INPUT  PARAMETER  (DB-ID)  AND  ONE 
OUTPUT  PARAMETER  FOUND-STATUS  (0  GOOD  AND  -1 
AN  ERROR  HAS  OCCURRED.  ALL  ERRORS  ARE  COVERED 
BY  ERROR  STATEMENTS  IN  THE  ROUTINE. 


ARGUMENTS : 


DB-ID  -  DSPLY  t S9( 9 ) ] 
FOUND-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


3-398 
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ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELRTT2 

UERROR 

ADDRNUM 

DELTEXT 

ERRPRO 


DELETE  A  RECORD  FROM  RECORDTYPE  ENITY 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


A0-A181  67 4  INTEGRATED  INFORMATION  SUPPORT  SVSTEH  (IISS)  VOLUME  3  2/3  ' 
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■DDL  COMMAND  PROCESSOR  Module  Doouaent&l i on 


MAMS: 

PURPOSE: 

LARGO AGE: 

MODULE  TYPE: 
PURCTIOM  TYPE: 
SOURCE  PILE: 
SOURCE  PILE  TYPE: 
HOST: 


DELDBS1 

DELETE  A  RECORD  FROM  DATABASE  ERITY 
C 

PURCTIOM 
IHT  () 

DELDBS1 
•  C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUHERTAT I OH  GROUP:  PS41100 


DESCRIPTION : 


SYNOPSIS 

C  —  DELDBS 1 ( RDB_ I D , VSTATUS ) 

COBOL  —  CALL  * DELDBS 1“  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELDBS 1(DBID. STATUS) 


INPUT: 

INT  *DB  ID  ; 
OUTPUT: 

INT  • STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DATABASE 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


DBID  -  INT  • 

STATUS  -  INT  • 


3-400 


^  f. 
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ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 

< 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELDBST 

DELETE  ALL  RECORD  SETS'  ASSOCIATIONS  WITH 

THE  DATABASE 

VAX-11  COBOL 

SUBROUTINE 

DELDBST 

.PRC 


SUBSYSTEM:  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


THIS  ROUTINE  WAS  DESIGNED  FOR  USE  WITH 


DRPDB  (DROP  DATA  BASE) 

THIS  ROUTINE  VERIFIES  THE  EXISTANCE  OF  A  SET, 

SELECT  A  SET  ONE  AT  A  TIME  IN  THE  NDML  LOOP, 
DELETES  THE  SET,  DELETES  THE  TEXTUAL  DESCRIPTION, 
AND  ADDS  THE  REUSABLE  NUMBER  BACK  IN  THE  CDM. 

IT  HAS  ONE  INPUT  PARAMETER  (DB-ID)  AND  ONE 
OUTPUT  PARAMETER  FOUND-STATUS  (0  GOOD  AND  -1 
AN  ERROR  HAS  OCCURRED.  ALL  ERRORS  ARE  COVERED 
BY  ERROR  STATEMENTS  IN  THE  ROUTINE. 


ARGUMENTS: 


DB-ID  -  DSPLY  [S9(9) ] 
FOUND-STATUS  «  DSPLY  [89(9)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UMIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
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ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELRST2 

UERROR 

ADDRNUM 

DELTEXT 

ERRPRO 


DELETE  A  RECORD  FROM  RECORDSET  ENTITY 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE . 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


I 


PS  020141100 
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MDDL  COMMAND  PROCESSOR  Module  Documentation 


MAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELDFL1 

DELETE  A  RECORD  FROM  DATAFIELD  ENITY 
C 

FUNCTION 
INT  () 

DELDFL1 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELDFL1 (0DB_ID, VSTATUS ) 

COBOL  —  CALL  "DELDFL1 "  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELDFL1(DB ID. STATUS) 


INPUT: 

INT  *DB_ID  ; 
OUTPUT: 

INT  • STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DATA_FIELD.  IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE 
STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 
ARGUMENTS : 


DB_ID  -  INT  * 

STATUS  -  INT  • 


PS  620141100 
1  November  1985 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

OOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELDFL2 

CONTROLS  THE  DELETING  OF  DATA  FIELDS 
C 

FUNCTION 
I  NT  () 

DELDFL2 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THAT  BELONGED  TO  THE  DELETED  RECORD. 

THIS  PROCESS  WILL  LOOP  FOR  EACH  DATA  FIELD 
AND  DELETE  THE  TEXT  DESCRIPTIONS,  THE  DATA 
FIELD  AND  CAPTURE  THE  DATA  FIELD  NUMBERS 
FOR  REUSABLE  NUMBER. 


SYNOPSIS 

C  —  DELDFL2 (0DB_ID ,  URTID,  STATUS) 

COBOL  —  CALL  "DELDFL2"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  —  CALL  DELDFL2(DBID,  RTID,  STATUS) 


INPUT : 

INT  *DB_ID  ; 
CHAR  *RT_ID  ; 

OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION : 


3-406 
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ARGUMENTS : 


DBID  -  I NT  * 

RTID  -  CHAR  * 

STATUS  -  I NT  * 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


GOSQL3 

ERRRPT 

COFETCH 

DELTEXT 

DRPDF 

ADDRNUM 

OOEXEC 

COBINDN 

CODFINN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE » 
ORACLE  ROUTINE 

DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
DELETE  A  RECORD  FROM  DATA  FIELD  ENITY 


ADD  A  AVAILABLE  NO  OF 
LINKED 

ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


A  POOL  NO  BACK  TO  NO 


CALLED  DIRECTLY  BY: 


DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELDFL3 

PURPOSE:  DELETE  A  RECORD  FROM  DATAFIELD  ENITY 

LANGUAGE:  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELDFL3 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELDFL3(©DB_ID,  BRTJD,  ©DF  ID,  ©STATUS) 

COBOL  —  CALL  “DELDFL3"  USING 

DB-ID, 

RT-ID, 

DF-ID, 

STATUS . 

FORTRAN  —  CALL  DELDFL3 ( DBID ,  RTID,  DFID,  STATUS) 


INPUT: 

INT  *DB_ID  ; 
CHAR  *RT_ID  ; 
CHAR  ’DF_ID  ; 

OUTPUT: 

INT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DATAFIELD 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


ARGUMENTS : 


O  U 

wrl\t.\ 


.’/■’I 


$8 

C$4 

Vf) 

ym 


>  t  > 

#/ .  ■ 

f .  rl 

■'>  ‘I 

■f'f 


>'  *i* 

iV»*| 

V.Vl 
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DB  ID  - 
RTID  - 
DF  ID  - 
STATUS  - 


I  NT  • 
CHAR  * 
CHAR  * 
I  NT  • 


ROUTINES  CALLED: 

00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELDBDF 


DRPFLD 


-  DELETE  ALL  DATA  FIELD  ASSOCIATIONS  WITH  THE 

DATABASE 

-  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-409 


rV*  4< 
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I 

» 

> 

I 

[  NDDL  COMMAND  PROCESSOR  Module  Document&t 1 on 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELDIV 

DELETE  FROM  DAT A_ ITEM  WHERE 
C 

FUNCTION 
I  NT  () 

DELDIV 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C 

COBOL 


VIEWNO  -:  *  INPUT  PARAMETER  1  " 

DELDIV(9VIEW_N0,  9STATUS ) 

CALL  “DELDIV-  USING 

VIEW-NO, 
STATUS . 


FORTRAN  --  CALL  DELDIV( VIEWNO. STATUS) 


INPUT: 

INT  -VIEW  NO  ; 

OUTPUT : 

INT  -STATUS  ; 

;  DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
\  DATA-ITEM 

|  WHERE  VIEWNO  EQUALS  "INPUT  PARAMETER  1" 

!  IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 

!  RETURN  VALUE  BOTH 

|  WILL  BE  0  ,  OTHERWISE  -1. 

' 

|  ARGUMENTS : 


VIEW  NO  =  INT  * 


3-410 
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STATUS  -  I NT  • 

ROUTINES  CALLED: 

00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE » 

OOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 

CALLED  DIRECTLY  BY: 

DRPVIEW  -  DROP  THE  VIEW. 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WHERE  DOMAINNO  -:  “INPUT  PARAMETER  1  “ 

SYNOPSIS 

C  —  DELDOM ( fiTDOMA I NNO ,  WSTATUS ) 

COBOL  —  CALL  "DELDOM"  USING 

DOMAIN-NO , 

STATUS . 

FORTRAN  —  CALL  DELDOM (DOMAINNO, STATUS) 


INPUT: 

INT  ’DOMAIN  NO  ; 
OUTPUT : 

INT  ’STATUS  ; 


DELDOM 

DELETE  RECORD  CLASS  FROM  DOMAIMCLASS 
C 

FUNCTION 
INT  () 

DELDOM 

.C 

CDM 

PS41100 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DOMAINCLASS 

WHERE  DOMAINNO  EQUALS  TO  “INPUT  PARAMETER  1“ 

TO  "INPUT  PARAMETER  2". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1 . 

ARGUMENTS : 


3-412 
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DOMAIMJK)  •  IET  • 

STATUS  -  1ST  • 


ROUTIEES  CALLED: 


OOSQL3 

ERRRPT 

OOEXEC 

OOBIRDR 


-  ORACLE  ROUT ZEE 

-  HAMDLE  ART  ERROR  CODE  PROM  ORACLE > 

-  ORACLE  ROUTIEE 

-  ORACLE  ROUTIRE 


CALLED  DIRECTLY  BY: 

DRPDOM  -  PROGRAM  RAME 

USED  IR  HAIR  PROGRAM ( S ) : 

RDDL/MAIR  -  MAIN  PROGRAM  FOR  THE  HDDfL  OOMMARD  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Nodule  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DELDSL1 

DELETE  A  RECORD  FROM 
C 

FUNCTION 
I  NT  () 

DELDSL1 

.C 

CDM 

PS41100 


DF  SET  LINKAGE  ENITY 


SYNOPSIS 

c  —  DELDSL 1 ( 0DB_ID , V STATUS ) 

COBOL  —  CALL  ' DELDSL 1“  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELDSL1(DBID, STATUS) 


INPUT: 

I NT  *DB_ID  ; 
OUTPUT : 

I NT  • STATUS  ; 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DFSETLINKAGE .  IF  SUCCESSFULLY  DELETED  THE  RECORD  , 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 
ARGUMENTS : 


DB  ID  -  I NT  • 

STATUS  -  I  NT  • 


3-414 
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ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELDSL2 

DELETE  A  RECORD  FROM  DF_S ET_L I NKAGE  ENITY 
C 

FUNCTION 
I  NT  () 

DELDSL2 

.C 


HOST : 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELDSL2 ( ©DB_ID ,  ©RT_ID,  ©STATUS ) 

COBOL  —  CALL  "DELDSL2”  USING 

DB-ID, 

RT-ID, 

STATUS . 

|  FORTRAN  —  CALL  DELDSL2(DBID,  RTID,  STATUS) 


INPUT: 

I NT  *DB_ID  ; 
CHAR  *RT_ID  ; 

OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DF_SET_LINKAGE 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  «=  INT  * 
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RTID  -  CHAR  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE 

-  HANDLE 

-  ORACLE 

-  ORACLE 


ROUTINE 

ANY  ERROR  CODE  FROM  ORACLE > 

ROUTINE 

ROUTINE 


CALLED  DIRECTLY  BY: 


DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


.'>1 
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a 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELDSL3 

PURPOSE :  DELETE  i 

LANGUAGE :  C 

MODULE  TYPE :  FUMCTI01 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE :  DELDSL3 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DELDSL3 

DELETE  A  RECORD  FROM  DFSETLINKAGE  ENITY 
C 

FUNCTION 
I  NT  () 

DELDSL3 

.C 


DESCRIPTION 


SYNOPSIS 

C 


DELDSL3(NDB_ID ,  NRTID,  BDFID,  If  STATUS ) 


COBOL 


CALL  "DELDSL3"  USING 
DB-ID, 
RT-ID, 
DF-ID, 
STATUS . 


FORTRAN 


CALL  DELDSL3( DBID .  RTID,  DFID.  STATUS) 


INPUT : 

INT  *DB_ID  ; 
CHAR  *RT_ID  ; 
CHAR  ‘DF  ID  ; 


OUTPUT: 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DF_SET_LINKAGE 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 
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DBID  .  I NT  * 

RTID  -  CHAR  * 

DFID  -  CHAR  • 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


,( 
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i 

NDDL  COMMAND 

PROCESSOR  Module  Documentation 

m 

1 

NAME: 

DELDT 

PURPOSE : 

DELETE  RECORD  CLASS  FROM 

USER  DEF  DATA  TYPE 

«, 

LANGUAGE : 

C 

i 

MODULE  TYPE: 

FUNCTION 

FUMCTION  TYPE: 

INT  C  ) 

SOURCE  FILE: 

DELDT 

k 

SOURCE  FILE  TYPE: 

.C 

HOST: 

!». 

SUBSYSTEM : 
SUBDIRECTORY : 

CDM 

DOCUMENTATION  GROUP:  PS41100 

'i 

DESCRIPTION: 

— 

WHERE  DATA  TYPE  NAME  -:  "INPUT  PARAMETER  1  " 

SYNOPSIS 

C 

DELDT ( DATATYPENAME ,  BSTATUS ) 

*1, 

COBOL 

CALL  "DELDT"  USING 

A 

DATA-TYPE-NAME , 

t 

STATUS . 

FORTRAN 

CALL  DELDT( DATATYPENAME . STATUS ) 

«< 

INPUT: 

i‘- 

CHAR  ‘DATA 

TYPENAME  ; 

OUTPUT : 

■\ 

INT  ‘STATUS  ; 

;< 

DESCRPIPTION: 

*,< 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 

USER  DEF  DATA  TYPE 

c 

WHERE  DATA 

TYPE  NAME  EQUALS  TO  "INPUT  PARAMETER  1" 

i 

TO  "INPUT 

PARAMETER  2 “ . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 

‘ 

RETURN  VALUE  BOTH 

WILL  BE  0 

,  OTHERWISE  -1. 

ARGUMENTS : 

f 

■a 

-Mfc 

Si 

n 

3-420 
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DATATYPENAME  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDT  -  DROP  A  DATA  TYPE  WITHIN  A  DOMAIN. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELDTD 

DELETE  RECORD  CLASS  FROM 
U  S  ER_DEF_DATA -TYPE 
C 

FUNCTION 
I  NT  () 

DELDTD 

-C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

SYNOPSIS 

C 

COBOL 

FORTRAN 


WHERE  DOMAINNO  -:  "INPUT  PARAMETER  1  “ 

DELDTD(©DOMAIN_NO,  ©STATUS ) 

CALL  "DELDTD"  USING 

DOMAIN-NO, 

STATUS . 

CALL  DELDTDC  DOMAINNO . STATUS ) 


INPUT: 

INT  *DOMAIN_NO  ; 
OUTPUT : 

INT  *  STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
USERDEFDATA-TYPE 

WHER  DOMAIN_NO  EQUALS  "INPUT  PARAMETER  1  " 

TO  "INPUT  PARAMETER  2". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 
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DOMAINJIO  -  I  NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

OOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDOM  -  PROGRAM  NAME 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELDTNO 

DELETE  ALL  DATA  TYPES  ASSOCIATED  WITH  A 
DOMAIN 

VAX- 11  COBOL 
SUBROUTINE 
DELDTNO 
-PRC 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  WILL  RETRIVE  ALL  USER_DEF_DATA_TYPE 
NUMBERS  (USDFDTNO)  ASSOCIATED  WITH  A  GIVEN  DOMAIN 
NUMBER  AND  DELETE  ALL  TEXTUAL  DESCRIPTIONS 
ASSOCIATED  WITH  THE  DATA  TYPE  AND  ADD  THE 
USDF  DT  NO  BACK  INTO  THE  CDM. 


ARGUMENTS : 


DOM-NO  -  DSPLY  [S9(9)l 
RETURN-STATUS  -  DSPLY  tS9(9)] 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 
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ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 


DRPDOM  -  PROGRAM  NAME 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELEC 

DELETE  THE  RECORD  FROM  ENTITYCLASS 
C 

FUNCTION 
INT  () 

DELEC 

-C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  EC_NO  -:  "INPUT  PARAMETER  1  " 

SYNOPSIS 

C  —  DELEC (©ECNO ,  ©STATUS 

COBOL  —  CALL  “DELEC"  USING 

EC-NO . 

STATUS . 

FORTRAN  --  CALL  DELEC (ECNO. STATUS) 


INPUT: 

INT  *  EC_NO  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ENTITYCLASS 

WHERE  ECNO  EQUALS  TO  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


3-426 


PS  620141100 
1  November  1985 


**Y 

#■ 


EC  HO  - 
STATUS  • 


ROUTINES  CALLED: 


I  NT  • 

I  NT  • 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  PROM  ORACLE) 

OOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPENT 


FNDECM 


-  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES. 

-  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELECAL 

PURPOSE:  DELETE  RECORD  CLASS  FROM  ENTITY  JIAME 

LANGUAGE:  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I  NT  () 

SOURCE  FILE :  DELECAL 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


WHERE  ECNAME  -:  ‘INPUT  PARAMETER  1  "  AND 
EC_NO  :-  “INPUT  PARAMETER  2"  : 

SYNOPSIS 

C  ~  DELECAL ( ECNAME ,  RECNO .  9 STATUS ) 

COBOL  --  CALL  “DELECAL”  USING 

EC-NAME . 

EC-NO. 

STATUS . 

FORTRAN  --  CALL  DELECAL ( ECNAME , ECNO . STATUS ) 


INPUT: 

CHAR  • EC  JIAME  ; 
I NT  “ECHO  ; 

OUTPUT: 

I NT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ENTITYNAME 

WHERE  ECNAME  EQUALS  TO  “INPUT  PARAMETER  1“  AND  EC_NO 
EQUALS 

TO  "INPUT  PARAMETER  2". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
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WILL  BE  0  ,  OTHERWISE  -1 . 
ARGUMENTS : 


ECNAME  -  CHAR  * 

EC_NO  -  I NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3 

ERRRPT 

OOEXEC 

GOBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

GETECAL  -  VERIFIES  THE  EXISTANCE  OF  AN  ALIAS  FOR  AN  ENTITY 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELECKW 

DELETE  A  RECORD  FROM  ECKEYWORD 
C 

FUNCTION 
I  NT  () 

DELECKW 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


WHERE  EC_NO  -:  "INPUT  PARAMETER  1"  ; 

SYNOPSIS 

C  —  DELECKW (0EC_NO , ©STATUS ) 

COBOL  —  CALL  "DELECKW"  USING 

EC-NO. 

STATUS . 

FORTRAN  —  CALL  DELECKW (ECNO, STATUS) 


INPUT: 

INT  * EC_NO  ; 
OUTPUT: 

INT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ECKEYWORD 

WHERE  EC_NO  EQUALS  TO  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


ARGUMENTS : 
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EC  HO  -  I  NT  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


C0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES. 

FNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-431 


PS  620141100 
1  Noveaber  1985 


HDDL  COMMAND  PROCESSOR  Module  Docuaentat 1 on 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELECNM 

DELETE  THE  RECORD  FROM  ENTITYNAME 
C 

FUNCTION 
I  NT  () 

DELECNM 

•  C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  ECNO  -:  "INPUT  PARAMETER  1  " 

SYNOPSIS 

C  —  DELECNM (8ECJH0 .  MSTATUS ) 

COBOL  --  CALL  "DELECNM"  USING 

EC-NO . 

STATUS . 

FORTRAN  —  CALL  DELECNM ( ECNO .  STATUS) 


INPUT: 

INT  *  EC_NO  ; 
OUTPUT : 

INT  • STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ENTITYNAME 

WHERE  ECNO  EQUALS  TO  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 
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EC  HO  -  I  NT  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


GOSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES. 

FNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELIASM 

DELETE  RECORD  CLASS  FROM  AUC_ST_MAPPING 
C 

FUNCTION 
I  NT  () 

DELIASM 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION : 


WHERE  DB_ID  «:  "INPUT  PARAMETER  1  "  AND 
SETID  :-  INPUT  PARAMETER  2  AND 
TAG  NO  :-  INPUT  PARAMETER  3 


SYNOPSIS 

C 

— 

DELI ASM (DB_ID,  NSET_ID, 

USTATUS) 

COBOL 

CALL  "DELIASM"  USING 

DB-ID, 
SET-ID, 
TAG-NO , 
STATUS . 

FORTRAN 

— 

CALL  DELI ASMCDBID, SETID 

.TAGNO, STATUS) 

INPUT: 

CHAR  *SET_ID  : 
INT  *DB_ID  ; 

I NT  *TAG_NO  ; 

OUTPUT : 

INT  *  STATUS  ; 


DESCRIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
AUC_ST_MAPPING 

WHERE  DBID  EQUALS  TO  "INPUT  PARAMETER  1"  AND  SET_ID 
EQUALS 
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TO  "INPUT  PARAMETER  2 “AND  TAG_NO  EQUALS  INPUT  PARAM  3. 
IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS: 


DB  ID  -  I NT  * 

SETID  -  CHAR  * 

TAGNO  -  I NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPSMAP  -  DROP  A  SINGLE  MAPPING 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELIAUC 

DELETE  A  REORD  FROM 
C 

FUNCTION 
I  NT  () 

DELIAUC 

.C 


INHERITED  ATT  USE 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  TAGNO  -  :  1  ; 

SYNOPSIS 

C  —  DELI  AUC(€TTAG_NO , BSTATUS ) 

COBOL  —  CALL  "DELIAUC"  USING 

TAG-NO, 
STATUS . 

FORTRAN  —  CALL  DELIAUC( TAGNO , STATUS) 


INPUT: 

INT  *TAG_NO  ; 

OUTPUT: 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
I NHERI TED_ ATTUS E 

WHERE  TAG_NO  EQUALS  TO  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


ARGUMENTS : 
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TAGNO  *  I NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE » 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELAUC  -  DELETE  INHERITEDATTUSE .  KEYCLASSMEMBER , 

DELMIGK  -  DELETE  MIGRATING  KEY  CLASS 

DLMIGRC  -  DELETE  MIGRATING  KEY  CLASS 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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MDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

t  C  —  DELI AUK ( UKCNO ,  BSTATUS) 

COBOL  —  CALL  "DELI AUK"  USING 

KC-NO , 
STATUS . 

FORTRAN  —  CALL  DELI AUK( KCNO ,  STATUS) 


DELIAUK 

DELETE  A  RECORD  FROM  I NHER I TEDATTUS E 

ENITY 

C 

FUNCTION 
I  NT  () 

DELIAUK 

.C 

CDM 

PS41100 


INPUT: 

I NT  *KC_NO  ; 
OUTPUT : 

I NT  *  STATUS  : 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
INHERITED_ATT_USE .  IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 
ARGUMENTS : 


KCNO  -  I NT  * 

STATUS  =  INT  * 

! 

I 

I 

J 


PS  620141100 
1  November  1985 


ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE  > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELMDKC  -  DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS  FOR 

AN  ENTITY 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME:  DELI PDF 

PURPOSE:  DELETE  RECORD  CLASS  FROM 

PRO JECT_DATA_F I ELD 
LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  DELI PDF 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


WHERE  ACNAME  -:  "INPUT  PARAMETER  1  "  AND 
ACJIO  :-  "INPUT  PARAMETER  2"  AND 
DFID  :«  "INPUT  PARAMETER  3  "  AND 
TAG_NO  :«  "INPUT  PARAMETER  4"  ; 

SYNOPSIS 

C  —  DELI PDF (UDB_ID,  RTID.  DF_ID,  TAG_NO 

HSTATUS ) 

COBOL  --  CALL  “DELI PDF"  USING 

DB-ID. 

RT-ID, 

DF-ID, 

TAG-NO . 

STATUS . 

FORTRAN  --  CALL  DELIPDF(DBID,RTID .DFID .TAGNO . STATUS ) 


INPUT: 

CHAR  *DF_ID  ; 
CHAR  *RT_ID  ; 
INT  *  DB_ I D  ; 
INT  *TAG_NO  ; 

OUTPUT : 

INT  *  STATUS  ; 


PS  620141100 
1  November  1965 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  PROM 
PROJECTDATAFIELD 

WHERE  DBID  EQUALS  TO  "INPUT  PARAMETER  1"  AND  RT  ID 
EQUALS 

TO  ‘INPUT  PARAMETER  2"  AND  DFID  EQUALS  INPUT  PARAMETER 
3 

AND  TAGMO  EQUALS  INPUT  PARAMETER  4  * 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 

DB  ID  - 

INT 

RT  ID  - 

CHAR 

DF  ID  - 

CHAR 

TAG  NO  - 

INT 

STATUS  - 

INT 

ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE. 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

DRPSMAP  -  DROP  A  SINGLE  MAPPING 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELIRCS 

PURPOSE:  DELETE  RECORD  CLASS  FROM  RCBASEDRECSET 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I  NT  () 

SOURCE  FILE:  DELIRCS 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


WHERE  DB_ID  -:  “INPUT  PARAMETER  1  "  AND 
SET  ID  :-  “INPUT  PARAMETER  2“  AND 
RTID  :-  “INPUT  PARAMETER  3  “  AND 
RCNO  :-  “INPUT  PARAMETER  4“  ; 

SYNOPSIS 

C  --  DELIRCS (9DB_ID,  SET_ID,  RT_ID,  MRCNO 

•STATUS ) 

COBOL  --  CALL  “DELIRCS*  USING 

DB-ID, 

SET-ID, 

RT-ID. 

RC-MO. 

STATUS . 

FOSETRAN  --  CALL 

DELIRCS ( DBID , SETID . RTID . RCNO . STATUS ) 


INPUT 

CHAR  *  SET  ID  ; 
CHAR  'RT  ID  ; 
INT  'DB  ID  ; 

I NT  *RC  NO  ; 

OUTPUT 

INT  *  STATUS  . 
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DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RC_BASED_REC_SET 

WHERE  DBID  EQUALS  TO  "INPUT  PARAMETER  1"  AND  RTID 
EQUALS 

TO  "INPUT  PARAMETER  3"  AND  SETID  EQUALS  INPUT 
PARAMETER  2 

AND  RCNO  EQUALS  INPUT  PARAMETER  4  ". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  - 
SETID 
RT  ID  - 
RC_NO  » 
STATUS 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPSMAP  -  DROP  A  SINGLE  MAPPING 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


I  NT  * 
CHAR  * 
CHAR  * 

I  NT  * 

I  NT  * 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELI SSI 

DELETE  A  RECORD  FROM  IMS_SEGMENT_SIZE 

ENITY 

C 

FUNCTION 
I  NT  () 

DELISS1 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELISS1 (UDB_ID .USTATUS ) 

COBOL  —  CALL  “DELI SSI"  USING 

DB-ID. 
STATUS . 

FORTRAN  —  CALL  DELI SS1(DBID, STATUS) 


INPUT: 

INT  *DB_ID  ; 
OUTPUT : 

INT  * STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
IMSSEGMENTSIZE.  IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1 . 
ARGUMENTS : 


DB_ID  -  INT  * 

STATUS  -  INT  * 
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ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE  > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELISS2 

DELETE  A  RECORD  FROM  IMSSEGMENTSIZE 

ENITY 

C 

FUNCTION 
I  NT  () 

DELISS2 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELISS2(0DB_ID,  URTID,  USTATUS) 

COBOL  —  CALL  "DELISS2"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  --  CALL  DELISS2(DBID,  RTID,  STATUS) 


INPUT : 

I  NT 
CHAR 

OUTPUT : 

I  NT 


*DB_ir  ; 
•RTID  ; 

•STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
IMS  SEGMENTSIZE.IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS  AND 

RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  -  INT  • 


3-446 
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RT  ID  -  CHAR  • 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELKC 

PURPOSE:  DELETE  , 

LANGUAGE:  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELKC 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DELKC 

DELETE  A  RECORD  FROM  KEYCLASS 
C 


DESCRIPTION: 


WHERE  KC  NO 


SYNOPSIS 

C 


DELKC (BKC  NO.0STATUS) 


COBOL 


CALL  "DELKC' 


USING 
KC-NO. 
STATUS . 


FORTRAN 


CALL  DELKCCKCNO, STATUS) 


INPUT: 

INT  *KC  NO  ; 


OUTPUT: 

INT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
KYCLASS 

WHERE  KCNO  -  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 


3-448 


4  •*'  i  V  i  , 


-t  i 
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KCNO  -  I NT  * 

STATUS  «  I NT  * 


ROUTINES  CALLED: 


C0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELMDKC  -  DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS  FOR 

AN  ENTITY 

DRPKC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  “DROP  KEY 

CLASS” . 

DELMTKC  -  DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-449 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DELKCM 

DELETE  A  RECORD  FROM  KEY_CLASS_MEMBER 
C 

FUNCTION 
I  NT  () 

DELKCM 

.C 

CDM 

PS41100 


DESCRIPTION: 


WHERE  KC  NO  -:  1  ; 


SYNOPSIS 

C  —  DELKCM ( UKCNO . BSTATUS ) 

COBOL  —  CALL  DELKCM"  USING 

KC-NO. 
STATUS . 

FORTRAN  —  CALL  DELKCM ( KCNO , STATUS ) 


INPUT: 

INT  * KC_NO  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
KEY_CLASS_MEMBER  WHERE  KCNO  -  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


KC  NO  -  INT  * 


3-450 
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STATUS  -  I NT  • 


ROUTINES  CALLED: 


GOSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELMDKC  -  DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS  FOR 

AN  ENTITY 

DRPKC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  “DROP  KEY 

CLASS" . 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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I 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELKCMT 

DELETE  A  RECORD  FROM  KEYCLASS  MEMBER 
C 

FUNCTION 
I  NT  () 

DELKCMT 

-C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


l 


DESCRIPTION: 


SYNOPSIS 

C 


COBOL 


FORTRAN  -- 


WHERE  TAG  NO  1  ; 

DELTAGMT( 0TAG_NO . BSTATUS ) 

CALL  "DELKCMT"  USING 
TAG-NO . 
STATUS . 

CALL  DELKCMT ( TAGNO , STATUS ) 


INPUT: 

INT  *TAG_NO  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
KEYCLASSMEMBER  WHERE  TAG_NO  =  "INPUT  PARAMETER  1“. 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 


TAG  NO  *  INT  * 


3-452 
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STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELAUCK  -  DELETE  ATTRIBUTE  USE  CLASS  KEY  MEMBER  GIVEN 

DELMIGK  -  DELETE  MIGRATING  KEY  CLASS 

DLMIGRC  -  DELETE  MIGRATING  KEY  CLASS 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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1 


! 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELKW 

DELETE  A  RECORD  FROM  AC  KEYWORD 
C 

FUNCTION 
I  NT  (  ) 

DELKW 

-C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  KW  NO  •:  1  ; 


SYNOPSIS 

C  -  -  DELKW  AC  ( 4TKWJN0 .  NSTATUS  ) 

COBOL  —  CALL  “DELKW'  USING 

KW-WO. 

STATUS 

FORTRAN  —  CALL  DELKW ( KWNO . STATUS ) 


INPUT: 

I NT  *KW_NO  ; 
OUTPUT: 

INT  * STATUS  : 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
ACKEYWORD 

WHERE  KWNO  -  “INPUT  PARAMETER  1 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 
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KVNO  -  I  NT  • 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


5 


CALLED  DIRECTLY  BY: 


DRPKVC  -  OBTAIN  THE  USED  IDENTIFIED  KEYWORD,  THEN  DROP 

THEIR  ASSOCIATIONS. 


V 

N1 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


V 


3-455 


rV. V.  r 


‘■S' 


!r,v 
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MDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELKVAC 

PURPOSE :  DELETE  - 

LANGUAGE:  C 

MODULE  TYPE :  FUMCTIO 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELKVAC 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DELKVAC 

DELETE  A  RECORD  FROM  ACKEYVORD 
C 

FUNCTION 
INT  () 

DELKVAC 

.C 


DESCRIPTION: 


WHERE  KV  NO 


SYNOPSIS 

C 


DELKVAC (VKV  NO.NSTATUS) 


COBOL 


CALL  "DELKVAC  USING 
KV-NO, 
STATUS 


FORTRAN 


CALL  DELKVACCKVNO. STATUS) 


INPUT: 

INT  *KW  NO  : 


OUTPUT : 

INT  ‘STATUS  : 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
AC_KEYVORD 

WHERE  KW  NO  -  "INPUT  PARAMETER  1 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS 


3-456 
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KWNO  -  I  NT  • 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPKW  -  DROP  A  KEYWORD  ASSOCIATION  FROM  EITHER  AN 

ATTRIBUTE, ENTITY  OR  REL 

DRPKVC  -  OBTAIN  THE  USED  IDENTIFIED  KEYWORD.  THEN  DROP 

THEIR  ASSOCIATIONS. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELKVEC 

DELETE  A  RECORD  FROM  EC_KEYWORD 
C 

FUNCTION 
I  NT  () 

DELKVEC 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  KW  NO  «:  1  ; 

SYNOPSIS 

C  —  DELKVEC ( 0KVNO . BSTATUS ) 

COBOL  —  CALL  "DELKVEC'  USING 

KW-NO. 
STATUS . 

FORTRAN  --  CALL  DELKVEC ( KWNO , STATUS ) 


INPUT: 

INT  *KW  NO  ; 
OUTPUT: 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
EC_KEYWORD 

WHERE  KWNO  -  " INPUT  PARAMETER  1 " . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


3-458 


PS  620141100 
1  November  1985 


KWMO  -  I  NT  » 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


G0SQL3 
ERRRPT 
COE X EC 
OOBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPKW  -  DROP  A  KEYWORD  ASSOCIATION  FROM  EITHER  AM 

ATTRIBUTE. ENTITY  OR  REL 

DRPKVC  -  OBTAIN  THE  USED  IDENTIFIED  KEYWORD.  THEM  DROP 

THEIR  ASSOCIATIONS. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELKVRC 

DELETE  A  RECORD  FROM  RCKEYWORD 
C 

FUNCTION 
I  NT  () 

DELKVRC 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS4U00 


DESCRIPTION: 


WHERE  KVNO  -:  1  ; 

SYNOPSIS 

C  —  DELKVRC ( NKVNO , NSTATUS ) 

COBOL  --  CALL  "DELKVRC"  USING 

KV-NO. 
STATUS . 

FORTRAN  --  CALL  DELKVRC( KVNO . STATUS ) 


INPUT: 

I NT  «KV  NO  ; 
OUTPUT: 

I NT  ‘STATUS  : 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RCKEYWORD 

WHERE  KV  NO  -  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS 


3-460 


PS  620141100 
1  November  1985 


KWNO  -  I  NT  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE* 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPKW  -  DROP  A  KEYWORD  ASSOCIATION  FROM  EITHER  AN 

ATTRIBUTE, ENTITY  OR  REL 

DRPKWC  -  OBTAIN  THE  USED  IDENTIFIED  KEYWORD,  THEN  DROP 

THEIR  ASSOCIATIONS. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-461 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELMDKC 

DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS 

FOR  AN  ENTITY 

VAX-11  COBOL 

SUBROUTINE 

DELMDKC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  DELETES  THE  KEY  CLASSES,  KEY  CLASS  MEMBERS, 
COMPLETE  RELATIONS  AND  CROSS  REFERENCES  FOR  A  GIVEN  ENTITY 
CLASS. 


ARGUMENTS : 


EC-NO  «  DSPLY  [S9(9) ] 
ERROR-STATUS  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELKCM 
DELCMPR 
DEL I AUK 
DELKC 
ADDRNUM 


-  DELETE  A  RECORD  FROM  KEYCLASSM EMBER 

-  DELETE  A  RECORD  FROM  COMPLETE_RELATION 

-  DELETE  A  RECORD  FROM  I NHER I TED_ ATT_U S E  ENITY 

-  DELETE  A  RECORD  FROM  KEY_CLASS 

-  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 


3-462 
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LINKED 

SELECNM  -  RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 


FNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST : 


DELMDRC 

DELETE  ALL  RELATION  CLASSES  FOR  AN  ENTITY 

VAX- 11  COBOL 

SUBROUTINE 

DELMDRC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  DELETES  THE  RELATION  CLASS  FOR  A  GIVEN  ENTITY. 


ARGUMENTS : 


EC-NO  =  DSPLY  [ S9(9) ] 
ERROR-STATUS  -  DSPLY  fS9(9)J 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELRC 

DELRCKW 

DELTEXT 

ADDRNUM 

SELECNM 

UERROR 

ERRPRO 


-  DELETE  A  RECORD  FROM  RELATIONCLASS 

-  DELETE  A  RECORD  FROM  RC_KEYWORD 

-  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

-  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

-  RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 

-  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
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CALLED  DIRECTLY  BY: 


FNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

C  —  DELMIGK(0TAG_NO) 

COBOL  —  CALL  “DELMIGK*  USING 

TAG-NO . 

FORTRAN  --  CALL  DELMIGK  (TAGNO) 


INPUT: 

I NT  *TAG_NO 
OUTPUT : 


DELMIGK 

DELETE  MIGRATING  KEY  CLASS 
C 

FUNCTION 
I  NT  () 

DELMIGK 

-C 

CDM 

PS41100 


DESCRIPTION 

THIS  ROUTINE  USES  AN  ORACLE  SELECT  STATEMENT  TO 
RETRIEVE  ALL 

MIGRATING  KEY  CLASSES  GIVEN  A  TAG  NUMBER.  ROUTINES  ARE 
CALLED 

WHICH.  FOR  EACH  NEW  TAG  NUMBER  SELECTED.  DELETE  THE 
INHERITED 

ATTRIBUTE  CLASS.  ATTRIBUTE  USE  CLASS.  COPY  CROSS 
REFERENCE  AND 

KEY  CLASS  MEMBER  ENTITIES  WHOSE  TAG  NUMBERS  MATCH. 
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ARGUMENTS : 


TAG  NO  -  I NT  * 

RTNSTA  -  I NT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


COSQL3 

ERRRPT 

COFETCH 

DELIAUC 

SPRINTF 

UERROR 

ADDRNUM 

DELKCMT 

DELAUCL 

COEXEC 

CODFINN 

COBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE » 

ORACLE  ROUTINE 

DELETE  A  REORD  FROM  INHERITED  ATT  USE 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  KEY_CLAS  S_MEMBER 
DELETE  A  RECORD  FROM  ATTRIBUTE  USE  CL 
ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPMGKM  -  DELETE  MIGRATED  KEY  CLASSES  ASSOCIATED  WITH  A 

KEY  CLASS 

DELAUCK  -  DELETE  ATTRIBUTE  USE  CLASS  KEY  MEMBER  GIVEN 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME :  DELMOD 

PURPOSE :  DELETE 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTIO 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  DELMOD 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DELMOD 

DELETE  A  RECORD  FROM  MODELCLASS  ENITY 
C 

FUNCTION 
INT  () 

DELMOD 

.C 


DESCRIPTION: 


SYNOPSIS 

C 


DELMODC ©MODEL  NO.  ©STATUS) 


COBOL 


CALL  ‘DELMOD"  USING 

MODEL-NO , 
STATUS . 


FORTRAN 


CALL  DELMODC MODELNO.  STATUS) 


INPUT: 

INT  * MODEL  NO  ; 


OUTPUT : 

INT  * STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
MODELCLASS.  IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE 
STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 


MODEL  NO  = 
STATUS  -= 


INT  * 
INT  * 
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ROOT I RES  CALLED: 


OOSQLS  -  ORACLE  ROOTIES 

ERUPT  -  IAIDU  AIT  ERROR  0008  TOOK  ORACLE  • 

OOEXXC  -  ORACLE  ROOTIRS 

OOBIRDR  -  ORACLE  ROOTIRS 


CALLED  DIRECTLY  RY 


DRPMOD  -  OORTTROLS  THE  PROCESS  I RG  LOGIC  TO  DROP  A  M008L. 


OSED  IS  HAIR  PROGRAM(S): 


SOOL/MAIH  -  HAIR  PROGRAM  POR  TEE  RDOL  OOMNARD  PROCESSOR 


*’k 


1% 
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j  IDDL  COMMAND  PROCESSOR  Module  Documentation 

i 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP 

DESCRIPTION 


SYNOPSIS 


C 

1 

1 

8 

1 

p 

i 

NO) 

COBOL 

CALL 

'DELHTKC* 

USING 

MODEL-NO 

FORTRAN 

CALL 

DELHTKC 

(HODELNO) 

DELHTKC 

DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL 
NUMBER 

C 

FUNCTION 
INT  () 

DELHTKC 

C 

CDM 

:  PS41100 


INPUT 

INT  *  MODEL  NO 
OUTPUT 


DESCRIPTION 

THIS  ROUTINE  USES  AN  ORACLE  SELECT  STATEMENT  TO  OBTAIN 
ALL 

KEY  CLASS  NUMBERS  WHICH  HAVE  MO  MEMBERS  FOR  EACH  KEY 
CLASS 

FOUND  THE  RECORD  IS  DELETED  FROM  THE  COMPLETE  RELATION 
CLASS . 

THE  KEY  CLASS  ITSELF.  AND  THE  KEY  CLASS  COPY  CROSS 
REFERENCE 

THIS  ROUTINE  WILL  ALSO  DELETE  TEXTUAL  DESCRIPTIONS  AND  ADD 
THE  REUSABLE  KEY  CLASS  NUMBER  BACK  TO  THE  CDM 
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ARGUMENTS: 


MODEL  NO  -  I  NT  • 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


00SQL3 

ERRRPT 

COFETCH 

DELCMPR 

SPRINTF 

UERROR 

ADDRNUM 

DELTEXT 

DELKC 

COEXEC 

CODFINN 

OOBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE  > 

ORACLE  ROUTINE 

DELETE  A  RECORD  FROM  COMPLETE  RELATION 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  DESCTEXT  ENITY 
DELETE  A  RECORD  FROM  KEYCLASS 
ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


ALTENT  -  CONTROL  PROCESSING  FOR  ALTER  ENTITY  CLASS 

COMMAND. 

ALTREL  -  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER 

RELATION  COMMAND 

DRPATT  -  CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES . 


USED  IN  MAIN  PROGRAM(S): 


MDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELOAC 

DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 

VAX- 11  COBOL 

SUBROUTINE 

DELOAC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


-  THIS  ROUTINE  SEARCHES  FOR  ALL  ATTRIBUTE  USE 
CLASSES  WHERE  THE  TAG  NUMBER  MATCHES  THE 
INPUT  PARAMETER.  EACH  OCCURRENE  IS  DELETED 
( DELAUC )  AND  THE  OWNED  ATTRIBUTE  CLASS  IS 
DELETED  ( DELOWAC ) . 


ARGUMENTS : 


AC-NO  -  DSPLY  t  S9(9) ] 
RETURN-STATUS  -  DSPLY  IS9(9)) 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELAUC  -  DELETE  INHERITED  ATT  USE.  KEY_CLASS_MEMBER . 

U ERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

DELOWAC  -  DELETE  A  RECORD  FROM  OWWED_ ATTR I BUTE 

ERRPRO 


CALLED  DIRECTLY  BY: 


DRPAC  -  DELETE  OWNED  ATTRIBUTES  ASSOCIATED  WITH  ENTITY 
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DRPATT  -  CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  FROM  TH 

FMDOAC  -  DELETES  ALL  OWNED  ATTRIBUTES  FOR  A  GIVEN  ENTITY 

CLASS 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DELOACE 

DELETE  A  RECORD  FROM 
C 

FUNCTION 
I  NT  () 

DELOACE 

.C 

CDH 

PS41100 


OWNED  ATTRIBUTE  ENITY 


SYNOPSIS 

C  --  DELOACE (VEC_NO.  NSTATUS) 

COBOL  --  CALL  *  DELOACE  *  USING 

EC-NO. 
STATUS . 

FORTRAN  --  CALL  DELOACE ( ECNO .  STATUS) 


INPUT: 

I NT  »EC  NO  ; 
OUTPUT: 

INT  • STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
OWNED  ATTRIBUTE.  IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1. 
ARGUMENTS : 


EC  NO  -  INT  • 

STATUS  -  INT  • 
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ROUTINES  CALLED: 


C0SQL3 
ERRRPT 
COEXEC 
COB I RDM 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

FNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELOWAC 

DELETE  A  RECORD  FROM  OWN  ED_ ATTR I BUTE 
C 

FUNCTION 
I  NT  () 

DELOWAC 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


WHERE  AC  NO  -:  " INPUT  PARAMETER  1 "  ; 


SYNOPSIS 

C  —  DELOWAC ( WACNO . » STATUS ) 

COBOL  --  CALL  'DELOWAC'  USING 

AC-NO. 
STATUS . 

FORTRAN  —  CALL  DELOWAC(ACNO , STATUS ) 


INPUT: 

INT  •  AC  NO  ; 
OUTPUT: 

INT  ’STATUS  : 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
OWNED  ATTRIBUTE 

WHERE  AC  NO  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1 

ARGUMENTS 
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ACNO  -  I NT  • 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELOAC  -  DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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DELPCB 

DELETE  A  RECORD  FROM  PSBPCB  ENITY 
C 

FUNCTION 
I  NT  () 

DELPCB 

.C 

CDM 

PS41100 

DESCRIPTION: 


SYNOPSIS 

C  --  DELPCB  C  9DB_  I D ,  If  STATUS  ) 

COBOL  —  CALL  “DELPCB"  USING 

DB-ID, 
STATUS . 

FORTRAN  --  CALL  DELPCB( DBID . STATUS ) 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


INPUT: 

INT  *DB  ID  ; 

OUTPUT: 

INT  • STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
PSBPCB .  IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS 
AND  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  -1 

ARGUMENTS 


DB  ID  -  INT  * 

STATUS  -  INT  * 


ROUTINES  CALLED 


PS  620141100 
1  November  1985 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE* 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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KDDL  COMMAND  PROCESSOR  Module  Docuaent&t i on 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE 
SOURCE  FILE: 

SOURCE  FILE  TYPE 
HOST: 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENTATION  GROUP 

DESCRIPTION 


DELPDFT 

DELETE  A  RECORD  FROM  PROJECT  DATA  FIELD 

ENITY 

C 

FUNCTION 
I  NT  (  ) 

DELPDFT 

C 

CDM 

PS41 100 


i  SYNOPSIS 

;  c 

|  COBOL 

( 

! 

* 

I  FORTRAN 


DELPDFT ( NT AG  NO  NSTATUS ) 

CALL  ‘DELPDFT*  USING 
TAG- NO 
STATUS 

CALL  DELPDFT ( TAGNO  STATUS ) 


INPUT 

I  NT  •  TAG  NO 
CHAR  *  NT  ID 

OUTPUT 

I NT  ‘STATUS 


DESCRP I PT I ON 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELFT!  A  RECORD  FROM 
PROJECT  DATA  FIELD  IF  SUCCESSFULLY  DELETED  THE  REOORI 

THE  STATUS 

AN!'  RETURN  VALUE  BOTH  WILL  BE  0  OTHERWISE 
ARGUMENTS 


T  AC.  NO  . 
STATUS  - 


I  NT 
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ROUTINES  CALLED: 


OOSQL3 
ERRRPT 
OOEXEC 
COB  I  NEW 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY 


PDFDB  -  RETRIEVES  PROJECT  DATA  FIELDS  FOR  A  GIVEN  DATA 

BASE 

PDFDF  -  RETRIVES  ALL  THE  PROJ  DATA  FIELD  OR  DF  BEING 

DROPPED 

PDFREC  -  RETRIEVES  ALL  PORJECT  DATA  FIELDS  FOR  A  GIVEN 

RECORD 

DRPHAP  -  COMMAND  PROCESSOR  FOR  THE  DROP  HAP  COMMAND 


USED  IN  MAIN  PROGRAM ( S ) : 

NDDL  MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-481 


PS  620141100 
1  November  1985 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELPDI 

DELETE  RECORD  CLASS  FROM  PRO JECT_DATA__ ITEM 
C 

FUNCTION 
I  NT  () 

DELPDI 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

SYNOPSIS 

C 

COBOL 

FORTRAN 


WHERE  VIEWNO  : -INPUT  PARAMETER  1“  ; 

DELPDI  (  BVIEWNO,  If  STATUS  ) 

CALL  “DELPDI”  USING 

VIEW-NO, 

STATUS . 

CALL  DELPDI (VIEWNO. STATUS) 


INPUT 

IWT  ‘VIEW  NO  ; 
OUTPUT 

I NT  *  STATUS  . 


IFSCRPIPTION 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
PROJECT  DATA  ITEM 

VNERE  VIEW  NO  EQUALS  “INPUT  PARAMETER  1“. 

IF  SUCCESSFULLY  DELETED  THE  PECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTfc 
•ILL  BE  0  OTHERWISE  -1. 


NT*. 

r»  m-  I  NT  * 
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STATUS  -  1ST  • 


ROUT I ME S  CALLED: 


C0SQL3 

ERRRPT 

COEXEC 

COBIMDM 


ORACLE  ROUT I ME 

HANDLE  AST  ERROR  CODE  PROM  ORACLE' 
ORACLE  ROUT I RE 
ORACLE  ROUTXSE 


CALLED  DIRECTLY  BY: 


DRPVIEV  -  DROP  THE  VIEW 

USED  IS  HAIR  PROGRAM ( S ) : 

SDDL/HAIM  -  HAIR  PROGRAM  FOR  THE  RDDL  COMMARD  PROCESSOR 
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MDCJL.  COMMAND  PROCESSOR  Module  Documr tel  »  on 


RAM 

PURPOSE 

LARGO AGE 
NODULE  TYPE 
PURCTIOR  TYPE 
SOURCE  PILE 
SOURCE  PILE  TYPE 
MOST 

SURSYSTEM 

S USD I RECTORY 
DOCUMENTATION  GROUP 


DELRER1 

DELETE  A  RECORD  PROM  RC  BASED  REC  SET 
EBITY 

C 

PURCTIOR 
I  NT  (  ) 

DCLRRR1 

C 


COM 


PS41 100 


DESCRIPTION 

SYNOPSIS 

C 

COBOL 

PORTRAN 


DELRBR1 ( VDB  ID.NSTATUS) 

CALL  ' DELRBR 1 '  USING 
DB-ID. 

STATUS 

CALL  DELRBR 1  (  DB ID. STATUS ) 


INPUT 

IMT  *  DB  ID  . 
OUTPUT 

I NT  ‘STATUS  . 


DESCRPI PTION 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  PROM 
RC  BASED  REC  SET  IF  SUCCESSFULLY  DELETED  THE  RECORD  . 
THE  STATUS 

AMD  RETURN  VALUE  BOTH  WILL  BE  0  .  OTHERWISE  1 
ARGUMENTS 


DB  ID  -  I NT  • 

STATUS  -  I NT  * 
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ROUTINES  CALLED: 


OOSQL3  -  ORACLE  SOUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  PNOM  ORACLE  > 

OOEEEC  -  ORACLE  ROUTINE 

OONINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  NT 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  RASE. 


USED  IN  MAIN  PROGRAM ( 8 ) . 


NDDL/ MAIN  -  HAIR  PROGRAM  POR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DELRBR2 

DELETE  A  RECORD  FROM  RC_BASED  RECSET 

ENITY 

C 

FUNCTION 
INT  () 

DELRBR2 

C 

CDM 

PS41100 


DESCRIPTION: 


SYNOPSIS 

C  --  DELRBR2( VDB_ID.  N8ETID.  NSTATUS) 

COBOL  --  CALL  * DELRBR2 ’  USING 

DB-ID, 

SET-ID. 

STATUS . 

FORTRAN  --  CALL  DELRBR2C DBID .  SETID,  STATUS) 


INPUT: 

INT  'DBID  ; 
CHAR  • SETID  ; 

OUTPUT : 

INT  • STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RC_BASED  REC_SET 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 
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MID  -  XWT  * 

srriD  -  chak  * 

status  -  irr  • 


ROUTINES  CALLED : 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  OODE  PROM  ORACLE. 

OOEXEC  -  ORACLE  ROUTINE 

OO SINDH  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DR P SET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  PROM  THE  DATABAS 

SELRSET  -  DELETE  ALL  ASSOCIATIONS  IN  THE  CDH  FOR  A  SET 

BEING  DROPPED 

SELSTH  -  DELETES  ALL  OWNER /MEMBERS  OF  THE  RECORD  TYPE 

BEING  DROPPED 


USED  IN  MAIN  PROGRAM ( S ) : 


MDDL/MAIM  -  MAIM  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
PUHCTIOM  TYPE 
SOURCE  PILE: 

SOURCE  FILE  TYPE 
HOST: 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENTATION  GROUP 

DESCRIPTION 


SYNOPSIS 

C  DELRBR3 ( NDB  I D ,  »SET  ID,  NRT  ID.  VSTATUS ) 

COBOL  CALL  'DELRBR3*  USING 

DB-ID. 

SET-ID. 

DP- ID. 

STATUS 

FORTRAN  --  CALL  DELRBR3 ( DBI D .  SETID.  DFID.  STATUS) 


INPUT 

INT  *DB  ID  ; 
CHAR  'SET  ID  ; 
CHAR  *RT  ID  ; 

OUTPUT : 

INT  'STATUS  ; 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RCBASEDRECSET 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 
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DELRBR3 

DELETE  A  RECORD  FROM  RCBASEDRECSET 
ENITY 

C 

FUNCTION 
INT  () 

DELRBR3 

C 

CDM 

PSA 1100 
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ARGUMENTS : 


DBID  -  I NT  • 

SET  ID  -  CHAR  * 

ITID  -  CHAR  • 

STATUS  -  I  ITT  • 


ROUTINES  CALLED: 


008QL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

OOEXEC  -  ORACLE  ROUTINE 

OOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAH(S) : 


NDDL/HAIN  -  MAIM  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-489 


PS  620141100 
1  lovtabcr  1085 


■DDL  COMMAND  PROCESSOR  Modal*  DoouMntatlon 


DKUIC 

DELETE  A  RECORD  PROM  RELATIONCLASS 

C 

PURCTIOM 
IMT  () 

DELRC 
C 

CDM 

PS41100 

DESCRIPTION: 


WHERE  RC  NO  ‘INPUT  PARAMETER  1* 


SYNOPSIS 

C  —  DELRC  C  NRCNO , VSTATUS ) 

COBOL  --  CALL  ‘DELRC*  USING 

RC-NO. 
STATUS . 

FORTRAN  --  CALL  DELRC ( RCNO . STATUS ) 


INPUT: 

I NT  *RC_NO  ; 
OUTPUT: 

I NT  'STATUS  ; 


NAME: 

PURPOSE : 

LANGUAGE: 

NODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  PILE: 

SOURCE  PILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RELAT I ONCLAS  S 

WHERE  RC_NO  -  ‘INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS : 


PS  620141100 
1  November  1085 


RCMO  -  INT  • 

STATUS  -  INT  • 


ROUTINES  CALLED: 


OOSQL3 

ERRRPT 

COEXEC 

OOBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANT  ERROR  CODE  FROM  ORACLE  > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELMDRC  -  DELETE  ALL  RELATION  CLASSES  FOR  AN  ENTITY 
DRPRCE  -  DROP  A  RELATION  CLASS  FOR  AN  ENTITY  BEING 

DROPPED 

DRPREL  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP 

RELATION"  COMMAND. 


USED  IN  MAIN  PROGRAH(S) : 

NDDL/HAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-491 


PS  620141100 
1  lovMber  1065 


WOOL  COMMAND  PROCESSOR  Module  DocuMnUtion 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 

DESCRIPTION: 


WHERE  RC  NO  - :  1  ; 

SYNOPSIS 

C  --  DELRCKW( WRCNO . NSTATUS ) 

COBOL  --  CALL  " DELRCKV *  USING 

RC-NO. 
STATUS . 

FORTRAN  --  CALL  DELRCKW ( RCNO  .  STATUS  ) 


INPUT: 

INT  'RC  NO  ; 
OUTPUT : 

INT  'STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RC_KEYWORD 

WHERE  RCNO  -  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


DELRCKW 

DELETE  A  RECORD  FROM  RC  KEYWORD 

C 

FUNCTION 
INT  (  ) 

DELRCKW 

C 

CDM 

:  PS41100 


ARGUMENTS : 


PS  680141 100 
1  RovMter  IMS 


rc  k  -  irr  • 

STATUS  -  1ST  • 


MOOT INKS  CALLED 


OOSQL3  -  ORACLE  ROOT I MX 

ERRRPT  -  HANDLE  ANT  ERROR  OOOC  PROM  ORACLE 

OOEXEC  -  ORACLE  ROUTINE 

CONI NON  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  NT 


DELHORC  -  DELETE  ALL  RELATION  CLASSES  FOR  AN  ENT ITT 
DRPRCE  -  DROP  A  RELATION  CLASS  FOR  AN  ENT ITT  BEING 

DROPPED 

DRPREL  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ‘DROP 

RELATION*  COMMAND 


USED  IN  MAIN  PROGRAM ( S ) . 


NDDL/HAIN  -  HAIR  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  lovoaber  IMS 


■DDL  COMMAND  PROCESSOR  Nodule  DocuMnUtlon 


NAME 
PURPOSE 
LANGUAGE 
MODULE  TYPE 
FUNCTION  TYPE 
SOURCE  FILE 
SOURCE  FILE  TYPE 
MOST 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENT AT I ON  GROUP 

DESCRIPTION 


WHERE  RC  NO  -  ‘INPUT  PARAMETER  1* 

SYNOPSIS 

C  DELRCST  (  NAC  NO .  NSTATUS ) 

COBOL  CALL  "DELRCST"  USING 

RC-NO. 

STATUS 

FORTRAN  CALL  DELRCSTC RCNO . STATUS ) 


INPUT 

INT  *  RC  NO  ; 
OUTPUT 

INT  ‘STATUS  ; 


DELRCST 

DELETE  RECORD  CLASS  FROM  RC  BASED  REC  SET 

C 

FUNCTION 
INT  (  ) 

DELRCST 

C 

CDN 

PS41 100 


DESCRPI PTION : 

THIS  ROUTINE  USES  ORACI  E  CALLS  TO  DELETE  A  RECORD  FROM 
RC  BASED  RECSET 

WHERE  RCNO  EQUALS  "INPUT  PARAMETER  1"  . 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


ARGUMENTS 
RC  NO 


3-494 


PS  620141100 
1  November  1985 


STATUS  -  I NT  • 


ROUTINES  CALLED: 


00SQL3 

ERRRPT 

OOEXEC 

OOBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

DRPMAP  -  COMMAND  PROCESSOR  FOR  THE  DROP  MAP  COMMAND 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


J. 
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PS  620141100 
1  November  1985 


HDDL  COMMAND  PROCESSOR  Module  Documentation 


MAKE :  DELREUS 

PURPOSE : 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE:  DELREUS 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 


DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELREUS  (POOL_NO,  NEXTNO.  STATUS) 

COBOL  —  CALL  "DELREUS"  USING 

POOL-NO. 

NEXT_NO. 

STATUS . 

FORTRAN  —  CALL  DELREUS  (POOLNO.NEXT  NO. STATUS) 


INPUT: 

INT  *  POOL_NO  ; 

OUTPUT: 

INT  *NEXT_NO  ; 

INT  *  STATUS  ; 

DESCRPIPTION 

THIS  ROUTINE  DELETES  A  UNIQUE  NUMBER  OF  A  POOL  NUMBER 
FROM 

REUSABLENUMBER  RELATION 
ARGUMENTS : 


POOLNO  -  INT  * 
NEXTNO  -  INT  * 
STATUS  -  INT  * 


3-496 


PS  620141100 
1  November  1985 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


NRGET 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


■  -v W -i 


•»*  -  -f 


.  .. 

PS  620141100 

1  November  1985 

NDDL  COMMAND  PROCESSOR  Module  Documentation 

•y*' 

NAME: 

DELRKM1 

PURPOSE : 

DELETE  A  RECORD  FROM  RECORD  KEY  MEMBER 

.■$ 

ENITY 

4V 

- ' 

LANGUAGE : 

C 

MODULE  TYPE: 

FUNCTION  i 

FUNCTION  TYPE: 

INT  () 

SOURCE  FILE: 

DELRKM1 

SOURCE  FILE  TYPE: 

.C 

V 

HOST: 

v 

SUBSYSTEM : 

CDM 

■  ^ 

SUBDIRECTORY : 

DOCUMENTATION  GROUP: 

PS41100 

.■•a 

DESCRIPTION: 

.,•■  y 

SYNOPSIS 

-'.t" 
*  t-. 

C 

DELRKM1 (UDBID , USATUS ) 

/  t 

COBOL 

CALL  "DELRKM1 "  USING 

#>[* 

DB-ID, 

■!': 

STATUS . 

FORTRAN 

CALL  DELRKMlCDBID, STATUS) 

-'A 

INPUT: 

INT  *DB_ID  ; 

OUTPUT : 

INT  ‘STATUS 

9 

y 

DESCRP I PTION : 

THIS  ROUTINE 

USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 

,  ^ 

RECORD  KEY  MEMBER.  IF  SUCCESSFULLY  DELETED  THE  RECORD  , 

THE  STATUS  1 

,  .. 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 

■  :> 

DB  ID  -  INT 

* 

STATUS  -  INT 

* 

Sfi 

;g 

'  .'x 

,  f 

3-498 

4prm* 

•'  ■'  V  V '  V  ■  •  \>  V  s  V  ,  ,< 

>*A*  V,v.V  v. .  y-v*:*  A*  ?*»-;*;* 

PS  620141100 
1  November  1985 


ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


t 

» 

i 

» 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELRKM2 

DELETE  A  RECORD  FROM  RECORDKEYMEMBER 

ENITY 

C 

FUNCTION 
I  NT  () 

DELRKM2 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELRKM2(UDB_ID ,  URTID,  BSTATUS) 

COBOL  —  CALL  “DELRKM2"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  —  CALL  DELRKM2 C DBID ,  RTID,  STATUS) 


INPUT : 

I NT  *DB_ID  ; 
CHAR  *RT_ID  ; 

OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDKEYMEMBER 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


3-500 


PS  620141100 
1  November  1985 


DBID  -  I NT  * 

RTID  -  CHAR  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

r  COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


C^RPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-501 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 

! 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELRKM3 

DELETE  A  RECORD  FROM  RECORDKEYMEMBER 

ENITY 

C 

FUNCTION 
I  NT  () 

DELRKM3 
•  C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELRKM3(BDB_ID,  NRT_ID.  NDF_ID,  BSTATUS) 

COBOL  —  CALL  "DELRXM3*  USING 

DB-ID, 

RT-ID, 

DF-ID, 

STATUS . 

FORTRAN  --  CALL  DELRKM3(DBID,  RTID,  DFID,  STATUS) 


INPUT : 

I NT  *DB_ID  ; 
CHAR  *RT_ID  ; 
CHAR  »DF_ID  ; 

OUTPUT : 

INT  ’STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDKEYMEMBER 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1 . 


3-502 


PS  620141100 
1  November  1985 


ARGUMENTS : 


DB  ID  - 
RT  ID  - 
DF  ID  . 
STATUS 


ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


I  NT  * 
CHAR  * 
CHAR  * 
I  NT  * 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentat ion 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DELRKY 1 

DELETE  A  RECORD  FROM  RECORDKEY  ENITY 
C 

FUNCTION 
I  NT  () 

DELRKY1 

.C 

CDM 

PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELRKY 1 ( 6DB_ID , ©STATUS ) 

COBOL  —  CALL  " DELRKY 1 “  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELRKY1 (DBID, STATUS ) 


INPUT : 

INT  *DB_ID  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDKEY.  IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE 
STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1. 
ARGUMENTS : 


DBID  -  INT  * 

STATUS  =  INT  * 


PS  620141100 
1  November  1985 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELRXY2 

DELETE  A  RECORD  FROM  RECORDKEY  ENITY 
C 

FUNCTION 
I  NT  () 

DELRKY2 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELRKY2 ( BDB_ID ,  ©RTID,  ©STATUS) 

COBOL  —  CALL  "DELRKY2"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  —  CALL  DELRKY2 ( DBID ,  RTID,  STATUS) 


INPUT: 

INT  *DB  ID  ; 
CHAR  *RT_ID  ; 

OUTPUT : 

INT  * STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDKEY 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  =  INT  * 


3-506 


PS  620141100 
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RT  ID  -  CHAR  • 

STATUS  -  I  NT  • 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 

DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DELRST2 

DELETE  A  RECORD  FROM  RECORDSET  ENTITY 
C 

FUNCTION 
INT  () 

DELRST2 

.C 

CDM 

PS41100 


DESCRIPTION : 


SYNOPSIS 

C  —  DELRST2(©DB_ID,  SETID,  ©STATUS) 

COBOL  —  CALL  " DELRST2 "  USING 

DB-ID, 

SET- ID, 

STATUS . 


FRTRAN  --  CALL  DELRST2( DBID ,  SETID,  STATUS) 


INPUT : 

INT  *DB_ID  ; 
CHAR  *SET_ID  ; 

OUTPUT : 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDSET 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  -  INT  * 


3-508 


PS  620141100 
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SETID  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELDBST  -  DELETE  ALL  RECORD  SETS'  ASSOCIATIONS  WITH  THE 

DATABASE 

DRPSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  FROM  THE  DATABAS 

SELRSET  -  DELETE  ALL  ASSOCIATIONS  IN  THE  CDM  FOR  A  SET 

BEING  DROPPED 

SELSTM  -  DELETES  ALL  OWNER/ MEMBERS  OF  THE  RECORD  TYPE 

BEING  DROPPED 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DELRST3 

PURPOSE:  DELETE  A  RECORD  FROM  RECORDSET  ENITY 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELRST3 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELRST3(BDB_ID,  BSET_ID, 

©RTIDOFOWNER.  ©STATUS ) 

COBOL  —  CALL  “DELRST3"  USING 

DB-ID, 

SET-ID, 

DF-ID, 

STATUS . 

FORTRAN  —  CALL  DELRST3(DBID,  SETID,  DFID,  STATUS) 


INPUT: 

INT  *DB_ID  ; 

CHAR  *SET_ID  ; 

CHAR  *RT_ID_OF_OWNER  ; 

OUTPUT: 

INT  • STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDSET 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


3-510 


PS  620141100 
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ARGUMENTS : 


DBID  -  I NT  * 

SETID  -  CHAR  * 

RTIDOFOWNER  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3 

ERRRPT 

COEXEC 

COBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-511 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

C  --  DELRTY2(8DB  ID,  BRTID,  ©STATUS) 

COBOL  —  CALL  "DELRTY"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  —  CALL  DELRTY ( DBID ,  RTID,  STATUS) 


INPUT: 

INT  *DB_ID  ; 
CHAR  *RT_ID  ; 

OUTPUT : 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
RECORDTYPE 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DELRTY 2 

DELETE  A  RECORD  FROM  RECORDTYPE  ENITY 
C 

FUNCTION 
INT  () 

DELRTY 2 
.C 

CDM 

PS41100 


PS  620141100 
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RTID  -  CHAR  * 

STATUS  -  I NT  • 


ROUTINES  CALLED: 


COSQTi3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE* 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELDBRT  -  DELETE  ALL  RECORD  TYPE  ASSOCIATIONS  WITH  THE 

DATABASE 

DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Document at ion 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DELSDF1 

DELETE  A  RECORD  FROM 

ENITY 

C 

FUNCTION 
I  NT  () 

DELSDF1 

.C 

CDM 

PS41100 


SEGMENT  DATA  FIELD 


SYNOPSIS 

C  --  DELSDF1  ( 8TDB_ID ,  9STATUS ) 

COBOL  --  CALL  "DELSDFl "  USING 

DB-ID, 
STATUS . 

FORTRAN  --  CALL  DELSDF1 (DBID . STATUS ) 


INPUT: 

INT  ‘DB_ID  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SEGMENT_DATA_FIELD .  IF  SUCCESSFULLY  DELETED  THE  RECORD 
,  THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1 . 
ARGUMENTS : 


DBID  *  INT  • 

STATUS  -  INT  * 


3-514 
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ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

C  —  DELSDF2(©DB_ID,  BRTID,  ©STATUS ) 

COBOL  —  CALL  "DELSDF2"  USING 

DB-ID, 

RT-ID, 

STATUS . 

FORTRAN  --  CALL  DELSDF2 ( DBID ,  RTID,  STATUS) 


DELSDF2 

DELETE  A  RECORD  FROM  SEGMENTDATAFIELD 

ENITY 

C 

FUNCTION 
I  NT  () 

DELSDF2 

.C 

CDM 

PS41100 


INPUT: 

INT  ‘DB  ID  ; 
CHAR  *RT_ID  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
S  EGMENTDAT A_F I ELD 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 
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DB  ID  -  I  NT  * 

RT  ID  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 

4 

4 

NAME :  DELSDF3 

PURPOSE:  DELETE  A  RECORD  FROM  SEGMENTDATAFIELD  < 

ENITY  < 

LANGUAGE :  C  j 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELSDF3 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELSDF3(NDB_ID,  6RTID,  BDFID,  STATUS) 

COBOL  —  CALL  "DELSDF3"  USING 

DB-ID, 

RT-ID. 

DF-ID, 

STATUS . 

FORTRAN  —  CALL  DELSDF3C DBID ,  RTID,  DFID.  STATUS) 


INPUT: 

INT  *DB_ID  ; 
CHAR  *RT_ID  ; 
CHAR  *DF_ID  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION :  < 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SEGMENTDATAF I ELD 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 


3-518 
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ARGUMENTS : 


DBID  -  I NT  * 

RTID  -  CHAR  * 

DF  ID  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION : 


WHERE  VIEWNO  :-  "INPUT  PARAMETER  1"  ; 

SYNOPSIS 

C  —  DELSECC  SAC_NO ,  USTATUS) 

COBOL  —  CALL  "DELSEC"  USING 

VIEW-NO, 

STATUS . 


DELSEC 

DELETE  RECORD  CLASS  FROM  SEC 
C 

FUNCTION 
I  NT  () 

DELSEC 

-C 

CDM 

PS41100 


FORTRAN  —  CALL  DELSECC VIEWNO, STATUS) 


INPUT : 

INT  ‘VIEW  NO  ; 
OUTPUT : 

INT  *  STATUS  : 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SEC 

WHERE  VIEW  NO  EQUALS  "INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


VIEW  NO 


INT  * 
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STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

GOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 

CALLED  DIRECTLY  BY: 

DRPVIEW  -  DROP  THE  VIEW. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DELSECR 

DELETE  RECORD  CLASS  FROM  SECRCCOMPONENT 
C 

FUNCTION 
I  NT  () 

DELSECR 

.C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 

SYNOPSIS 

C 

COBOL 

FORTRAN 


WHERE  VIEWNO  -:  "INPUT  PARAMETER  1"  ; 

DELSECR (  &VIEWNO,  BSTATUS) 

CALL  "DELSECR"  USING 

VIEW-NO , 

STATUS . 

CALL  DELSECRC VIEWNO , STATUS ) 


INPUT : 

INT  *VIEW_NO  ; 

OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SEC_RC_COMPONENT 

WHERE  VIEWNO  EQUALS  INPUT  PARAMETER  1". 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


E 


ARGUMENTS : 


VIEW  NO  -  INT  * 
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STATUS  -  I NT  » 


ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE  ROUTINE 

-  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

DRPVIEW  -  DROP  THE  VIEW. 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELSN1 

DELETE  A  RECORD  FROM 
C 

FUNCTION 
I  NT  () 

DELSN1 

.C 


SCHEMA  NAMES  ENITY 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  DELSNK0DBID,  ©STATUS) 

COBOL  —  CAL  "DELSN1 "  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELSN1 (DBID, STATUS) 


INPUT: 

INT  *DB_ID  ; 
OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SCHEMANAMES 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 

ARGUMENTS : 


DB_ID  -  INT  * 

STATUS  -  INT  * 
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ROUTINES  CALLED: 


00SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME:  DELSTM1 

PURPOSE:  DELETE  A  RECORD  FROM  SETTYPEMEMBER  ENITY 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE:  DELSTM1 

SOURCE  FILE  TYPE:  .C 

HOST : 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELSTM1 (®DB_ID , USTATUS ) 

COBOL  —  CALL  “ DELSTM 1 "  USING 

DB-ID, 
STATUS . 

FORTRAN  —  CALL  DELSTM1(DBID, STATUS) 


INPUT: 

INT  *DB_ID  ; 
OUTPUT : 

INT  * STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SET_TYPE_MEMBER .  IF  SUCCESSFULLY  DELETED  THE  RECORD  , 
THE  STATUS 

AND  RETURN  VALUE  BOTH  WILL  BE  0  ,  OTHERWISE  -1. 
ARGUMENTS : 


DBID  -  INT  * 

STATUS  -  INT  * 
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ROUTINES  CALLED: 


G0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANT  ERROR  CODE  FROM  ORACLE » 

OOEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BT: 


DRPDB  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 

DATA  BASE. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME:  DELSTM2 

PURPOSE:  DELETE  A  RECORD  FROM  S ET  TY PE  MEMBER 

ENTITY 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  I NT  () 

SOURCE  FILE :  DELSTM2 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DELSTM2(©DB_ID,  SET_ID,  ©STATUS ) 

COBOL  —  CALL  “DELSTM2"  USING 

DB-ID, 

SET-ID, 

STATUS . 

FRTRAN  —  CALL  DELSTM2(DBID,  SETID,  STATUS) 


INPUT: 

INT  *DB_ID  ; 
CHAR  *SET_ID  ; 

OUTPUT: 

INT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SETTYPEMEMBER 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1 . 


ARGUMENTS : 
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DBID  -  I NT  * 

SETID  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  FROM  THE  DATABAS 

SELRSET  -  DELETE  ALL  ASSOCIATIONS  IN  THE  CDM  FOR  A  SET 

BEING  DROPPED 

SELSTM  -  DELETES  ALL  OWNER /MEMBERS  OF  THE  RECORD  TYPE 

BEING  DROPPED 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DELSTM3 

DELETE  A  RECORD  FROM  SETTYPEMEMBER  ENITY 
C 

FUNCTION 
I  NT  () 

DELSTM3 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


DELSTM3(©DB_ID,  BSETID, 

©RT_ ID_OF_MEMBER ,  ©STATUS ) 

CALL  "DELSTM3"  USING 
DB-ID, 

SET-ID, 

DF-ID, 

STATUS . 

FORTRAN  —  CALL  DELSTM3(DBID,  SETID,  DFID,  STATUS) 


SYNOPSIS 

C 

COBOL 


INPUT : 

INT  *DB_ID  ; 

CHAR  *SET_ID  ; 

CHAR  *  RT_ I D_OF_MEMBER  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
SET_TYPE_MEMBER 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  .  OTHERWISE  -1. 
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ARGUMENTS : 


DBID  -  I NT  * 

SETID  -  CHAR  * 

RTIDOFMEMBER  -  CHAR  * 

STATUS  -  I NT  » 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPFLD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 

DATA  FIELD. 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME :  DELTEXT 

PURPOSE:  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELTEXT 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  --  DELTEXT(©OBJECT_TYPE,  ©OBJECT  NO, 

©STATUS) 

COBOL  —  CALL  "DELTEXT"  USING 

OBJECT-TYPE , 
OBJECT-NO, 

STATUS . 

FORTRAN  —  CALL 

DELTEXT( OBJECT-TYPE , OBJECT-NO , STATUS ) 


INPUT: 

CHAR  ‘OBJECT  TYPE  ; 
INT  ‘OBJECTNO  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DESC_TEXT 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 


ARGUMENTS : 
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OBJECTTYPE 
OBJECTNO  - 
STATUS  - 


CHAR  * 
INT  * 

I  NT  * 


ROUTINES  CALLED: 


G0SQL3 

ERRRPT 

COEXEC 

COBINDN 


-  ORACLE 

-  HANDLE 

-  ORACLE 

-  ORACLE 


ROUTINE 

ANY  ERROR  CODE  FROM  ORACLE > 

ROUTINE 

ROUTINE 


CALLED  DIRECTLY  BY: 


DELDBDF 

DELDBRT 

DELDBST 

DELDTNO 

DELMDRC 

DRPATT 

DRPDB 

DRPDIV 

DRPDOM 

DRPENT 

DRPFLD 

DRPKWC 

DRPMOD 

DRPRCE 

DRPREC 

DRPREL 

DRPSET 

DRPVIEW 


DELETE  ALL  DATA  FIELD  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  ALL  RECORD  TYPE  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  ALL  RECORD  SETS’  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  ALL  DATA  TYPES  ASSOCIATED  WITH  A  DOMAIN 

DELETE  ALL  RELATION  CLASSES  FOR  AN  ENTITY 

CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 
ATTRIBUTE  CLASSES  FROM  TH 

CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 
DATA  BASE. 

DELETE  DATA  ITEM  DESCRIPTION  TEXTS  ASSOCIATED 
WITH  VIEW 

PROGRAM  NAME 

CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 
ENTITIES. 

CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 
DATA  FIELD. 

OBTAIN  THE  USED  IDENTIFIED  KEYWORD,  THEN  DROP 
THEIR  ASSOCIATIONS. 

CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A  MODEL. 

DROP  A  RELATION  CLASS  FOR  AN  ENTITY  BEING 
DROPPED 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 
RECORD  COMMAND. 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP 
RELATION"  COMMAND. 

CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 
SET  FROM  THE  DATABAS 

DROP  THE  VIEW. 
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FNDACM 

FNDECM 

SELRSET 

SELSTM 

DELAUC 

DELDFL2 

DELMTKC 


DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN  MODEL 
DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 
A  GIVEN  MODEL 

DELETE  ALL  ASSOCIATIONS  IN  THE  CDM  FOR  A  SET 
BEING  DROPPED 

DELETES  ALL  OWNER/ MEMBERS  OF  THE  RECORD  TYPE 
BEING  DROPPED 

DELETE  INHERITED_ATT_USE ,  KEYCLASSMEMBER , 

CONTROLS  THE  DELETING  OF  DATA  FIELDS 

DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


» 
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NAME :  DELTXT 

PURPOSE:  DELETE  DESCRIPTION  TEXT  GIVEN  THE  OBJECT 

TYPE, 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE :  DELTXT 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


DESCRIPTION  TYPE  AND  THE  OBJECT  NUMBER. 

SYNOPSIS 

C  —  DELTXT  (OBJTYPE,  DESC_TYPE ,  »OBJ  NO, 

0STATUS) 

COBOL  --  CALL  "DELTXT"  USING 

OBJ-TYPE 

DESC-TYPE 

OBJ-NO 

STATUS 

FORTR/ N  --  CALL  DELTXT 

( OBJTYPE , DESCTYP , OBJNO . STATUS ) 


INPUT: 

CHAR  OBJ_TYPE[] 
CHAR  DESCTYPEf ] 
INT  *OBJ_NO 
OUTPUT : 

INT  ‘STATUS 


DESCRIPTION 

DELTXT  DELETES  ALL  DESCRIPTION  TEXT  CORRESPONDING  TO  A 
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PARTICULAR 

OBJECT  TYPE,  OBJECT  NUMBER  AND  DESCRIPTION  TYPE  USING  A 
SQL  DELETE 

COMMAND.  IF  THE  DELETE  WAS  SUCCESSFUL,  STATUS  IS  ZERO 
AND  THE 

VALUE  OF  THE  FUNCTION  IS  ZERO.  IF  UNSUCCESSFUL,  STATUS 
AND  THE 

FUNCTION  VALUE  ARE  SET  TO  -1. 

ARGUMENTS : 


OBJ  TYPE  -  CHAR  [] 

DESC  TYPE  =  CHAR  [] 

OBJ  NO  =  INT  * 

STATUS  =  INT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


FILEINS  -  INSERT  DESCRIPTION  TEXT  INTO  CDM 

STRINS  -  INSERT  DESCRIPTION  TEXT  INTO  THE  CDM 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DEPATT 

SELECT  ALL  THE  ATTRIBUTES  IN  THE 
C 

FUNCTION 
I  NT  () 

DEPATT 

.C 

CDM 

PS41100 


DESCRIPTION: 


FROM-MODEL  STRUCTURE  AND  GENERATE 
NDDL  COMMANDS  TO  CREATE  THE  ATTRIBUTES  , 
THEIR  KEYWORDS. 

ALIAS.  THE  KEYWORDS  AND  DESCRIPTIONS  IN  THE 
TO-MODEL 


SYNOPSIS 

C  —  DEPATT  ( EC_NO .  WMODEL  NAME. 

UKEYWORD_FLAG, 

BALIASFLAG ,  UDESC  FLAG.  0EC  NO)  ; 

COBOL  —  CALL  "DEPATT'  USING 

MODEL-NO . 

MODEL-NAME . 

KEYWORD- FLAG. 

ALIAS-FLAG, 

DESC-FLAG, 

EC-NO . 


FORTRAN  --  CALL  DEPATT( MODELNO .  MODELNAME , 
KEYWORDFLAG,  ALIASFLAG. 

DESCFLAG ,  ECNO) 


INPUT: 

I NT  *EC_NO  ; 

CHAR  *  MODEL  NAME  ; 
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I NT  *  KEYWORDFLAG  ; 
I NT  *ALIAS_FLAG  ; 

I NT  *DESC  FLAG  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  RETRIEVE  RECORDS  FROM 
ATTRIBUTECLASS ,  ATTRIBUTENAME ,  DOMAINCLASS ,  THEN  USE 
THE 

INFORMATION  TO  GENERATE  NDDL  COMMAND  STATEMENT  FOR 
EACH  DEPENDANT  ENTITY  IN  THE  STRUCTURE. 


ARGUMENTS : 


ECNO  = 

MODEL  NAME  = 
KEYWORD  FLAG 
ALIAS  FLAG  - 
DESC  FLAG  - 


INT  * 

CHAR  * 
CHAR  * 
CHAR  * 
CHAR  * 


ROUTINES  CALLED: 


C0SQL3 

ERRRPT 

COFETCH 

STRNCMP 

GENDESC 

GENATT 

STRNCPY 

GENALI 

COEXEC 

COBINDN 

CODFINN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

ORACLE  ROUTINE 

GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 
OBJECT  TYPE  AND  NO 

GENERATE  A  CREATE  ATTRIBUTE..  COMMAND 

GENERATE  A  CREATE  ALIAS  COMMAND  FOR  AN  OBJECT 
TYPE 

ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/ MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


DEPENT 

SELECT  ALL  THE  DEPENDANT  ENTITY  CLASSES 
C 

FUNCTION 
I  NT  () 

DEPENT 
.C 

CDM 

PS41100 

DESCRIPTION: 


IN  THE  STRUCTURE  OF  THE  FROM-MODEL. 


SYNOPSIS 

C  —  DEPENT(©EC_NO,  ©MODELNAME, 

©KEYWORDFLAG . 

©ALI AS_FLAG ,  ©DESCFLAG ,  EC_NO)  ; 

COBOL  ■—  CALL  "DEPENT"  USING 

MODEL-NO , 

MODEL-NAME , 

KEYWORD- FLAG, 

ALIAS -FLAG, 

DESC-FLAG , 

EC-NO. 

FORTRAN  —  CALL  DEPENT ( MODELNO ,  MODELNAME , 

KEYWORDFLAG,  ALIASFLAG, 

DESCFLAG , ECNO ) 


INPUT: 

I NT  *  EC_NO  ; 

CHAR  *MODEL_NAME  ; 
INT  ‘KEYWORDFLAG  ; 
INT  * ALIAS_FLAG  ; 
INT  ‘DESCFLAG  ; 

INT  ‘EC  NO  ; 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST : 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 
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DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  RETRIEVE  RECORDS  PROM 
ATTRIBUTECLASS ,  ATTRIBUTENAME ,  DOMAINCLASS .  THEN  USE 
THE 

INFORMATION  TO  GENERATE  NDDL  COMMAND  STATEMENT. 
ARGUMENTS : 


EC  NO  - 
MODELNAME  - 
KEYWORDFLAG 
ALIASFLAG  = 
DESC  FLAG  * 


INT  * 

CHAR  * 
CHAR  * 
CHAR  * 
CHAR  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COFETCH  -  ORACLE  ROUTINE 
STRNCMP 

GENDESC  -  GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 

OBJECT  TYPE  AND  NO 

BLECLST  -  THIS  ROUTINE  CREATES  A  ROW  IN  THE  UNBOUNDED 

EC_LIST 

GENENT  -  GENERATE  A  CREATE  ENTITY . .OWNED 

ATTRIBUTE. .KEYWORD  COMMAND 

STRNCPY 

GENALI  -  GENERATE  A  CREATE  ALIAS  COMMAND  FOR  AN  OBJECT 

TYPE 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 

CODFINN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 

CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP 

DESCRIPTION: 


DEPFROM 

GENERATE  CREATE 

COMMANDS  IN  THE 

VAX- 11  COBOL 

SUBROUTINE 

DEPFROM 

-PRC 

CDM 

PS41100 


RELATION , DESCRIBE 
TO-MODEL 


THIS  ROUTINE  SELECTS  ALL  THE  RELATIONS  IN  WHICH  THE 
FROM-ENTITY  IS  THE  DEPENDENT  ENTITY.  IF  THE  SAME  ENTITY 
EXISTS  IN  THE  TO-MODEL  BUT  NOT  THE  RELATION,  THEN  A  CREATE 
RELATION  AND  DESCRIBE  COMMANDS  ARE  GENERATED  FOR  THE 
FROM -RELAT I ON . 


ARGUMENTS : 


FROM-EC-NO  -  DSPLY  [S9(9)] 
TO-EC-NO  -  DSPLY  [S9(9)] 
FROM-EC-NAME  -  DSPLY  [X(30)3 
TO-EC-NAME  -  DSPLY  [X(30>] 
TO-MOD-NO  -  DSPLY  [S9(9)] 
FROM-MOD-NO  -  DSPLY  [S9(9)] 
KW-FLAG  -  DSPLY  [9] 

DESC-FLAG  -  DSPLY  [9] 
COMBINE-TYPE  «*  DSPLY  [9] 
RCNO-LIST  -  RECRD 


INCLUDE  FILES: 


SRVRET 

RELTBL 


AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 
LIST  OF  RELATION  CLASSES  IN  A  MODEL 
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ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


SELECNM 

VERRC 

VERENT 

VERRCNM 

GENRNME 

BLKCL1 

MIGREL 

CHBRKW 

ADDPARM 

GENDESC 

ERRPRO 


-  RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 

-  verify  the  existence  of  a  relation  class. 

-  VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 

MODEL 

-  VERIFY  EXI STANCE  OF  A  RELATION  IN  A  MODEL 

-  FORMAT  THE  CREATE  RELATION  CLAUSE 

-  STORE  ALL  KEY  CLASS  INFO  FOR  AN  ENTITY  IN  A  LIST 

-  GENERATE  A  MIGRATES  CLAUSE  FOR  A  CREATE 

RELATION  COMMAND 

-  SELECT  AND  GENERATE  RELATION  CLASS  KEYWORDS 

-  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELIMITER 

-  GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 

OBJECT  TYPE  AND  NO 


CALLED  DIRECTLY  BY: 


CERELS  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  IN  A  RELATION. 

CMBENT  -  OONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DEPREL 

FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 

GENERATE 

C 

FUNCTION 
I  NT  () 

DEPREL 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THE  NDDL  COMMANDS  TO  CREATE  THE  RELATIONSS 
,  MIGRATE 

ATTRIBUTE  AND  ADD  THE  KEY  CLASSES  FOR  EACH 
DEPENDENT 

ENTITY  IN  THE  LEVEL 


SYNOPSIS 

C  --  DEPREL (SMODELJNO ,  ©MODELNAME . 

@KEYWORD_FLAG , 

0DESC  FLAG, EC  NO)  ; 


COBOL  —  CALL  "DEPREL"  USING 

MODEL-NO . 
MODEL-NAME , 
KEYWORD-FLAG , 
DESC-FLAG , 

EC-NO . 

FORTRAN  --  CALL  DEPREL ( MODELNO ,  MODELNAME , 
KEYWORDFLAG , 

DESCFLAG , ECNO ) 


INPUT: 

I NT  ‘MODELNO  ; 
CHAR  ‘MODEL  NAME  ; 
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I NT  *  KEYVORDFLAG  ; 
I NT  *DESC_FLAG  ; 

INT  *EC  NO  ; 


DESCRPIPTION : 
ARGUMENTS : 


INT  * 

INT  * 

CHAR  * 
CHAR  * 
CHAR  * 

=  INT  * 


MODNO  - 
EC  NO  - 
MODEL_NAME  - 
KEYWORDFLAG  - 
DESCFLAG  » 

RC  DEPKC  LIST 


ROUTINES  CALLED: 


GOSQL3 

ERRRPT 

BLRCKC1 

COFETCH 

SELECNM 

GENREL 

GENDESC 

ALLKEY 

STRNCPY 

COEXEC 

COBINDN 

CODFINN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE  > 

FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 
ORACLE  ROUTINE 

RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 
GENERATE  CREATE  RELATION  . .MIGRATES . .KEYWORD 
COMMAND 

GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 
OBJECT  TYPE  AND  NO 
GENERATES  KEY  CLASS  FOR  AN  ENTITY 

ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DESCRB 

COMMAND  PROCESSOR  FOR  THE  NDDL  DESCRIBE 

COMMAND 

C 

FUNCTION 
I  NT  () 

DESCRB 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 

SYNOPSIS 

C 

-- 

DESCRB  (SMODEL^NO) 

COBOL 

— 

CALL  "DESCRB"  USING 

MODEL-NO . 

FORTRAN 

_ 

CALL  DESCRB  ( MODELNO ) 

INPUT: 

I NT  ‘MODEL  NO 
OUTPUT : 


DESCRIPTION 

DESCRB  VERIFIES  THAT  THE  DESCRIPTION  TYPE  AND  THE 
OBJECT  TO  BE 

DESCRIBED  IS  VALID  AND  EXISTS.  THE  DESCRIPTION  INPUT 
TYPE  (EDITOR, 

FILE  OR  ENTERED  TEXT)  IS  DETERMINED.  THE  DESCRIPTIONS 
ARE  THEN 

ENTERED  INTO  THE  CDM. 


ARGUMENTS : 
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MODEL  NO  -  INT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

LISTID  -  PROVIDES  LIST  OF  PARSED  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VEROBJ 

TXTTYP 

RDDESC 

LOADESC 

TOUPPER 

VERDSTP 

SPRINTF 

UERROR 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THAT  THE  OBJECT  EXISTS. 

DETERMINE  SOURCE  OF  DESCRIPTION  TEXT 
STORE  DESCRIPTION  ON  THE  CDM 
LOAD  DESCRIPTION  FROM  TEXT  EDITOR 

VALIDATE  A  USER  ENTERED  DESCRIPTION  TYPE 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME :  DLDSL2 

PURPOSE:  DELETE  A  RECORD  FROM  DFSETLINKAGE  ENTITY 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  DLDSL2 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  DLDSL2(®DB  ID.  SETID.  ©STATUS ) 

COBOL  —  CALL  "DLDSL2"  USING 

DB-ID, 

SET-ID, 

STATUS . 

FRTRAN  --  CALL  DLDSL2(DBID,  SETID,  STATUS) 


INPUT: 

INT  *DB  ID  ; 
CHAR  ‘SETID  ; 

OUTPUT : 

INT  ‘STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DFSETLINKAGE 

IF  SUCCESSFULLY  DELETED  THE  RECORD  ,  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DB  ID  =  INT  * 
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SETID  -  CHAR  * 

STATUS  -  I NT  * 


ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A 

SET  FROM  THE  DATABAS 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DLMDAUC 

DELETE  ATTRIBUTE  USE  CLASSES  ASSOCIATED 

WITH  ENTITY 

VAX- 11  COBOL 

SUBROUTINE 

DLMDAUC 

.PRC 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  DELETES  THE  ATTRIBUTE  USE  CLASSES  FOR  A  GIVEN 
ENTITY . 


ARGUMENTS : 


EC-NO  *  DSPLY  [S9(9)] 
ERROR-STATUS  =  DSPLY  [S9(9)J 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELAUC  -  DELETE  INHERITED  ATTUSE.  KEY  CLASSMEMBER , 

SELECNM  -  RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ERRPRO 
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CALLED  DIRECTLY  BY: 


PNDECM  -  DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 

A  GIVEN  MODEL 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DLMIGRC 

DELETE  MIGRATING  KEY  CLASS 
C 

FUNCTION 
INT  () 

DLMIGRC 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


ONLY  THRU  A  SINGLE  RELATION  CLASS 


SYNOPSIS 

C  —  DLM I GRC  ( €TT  AG_NO ,  URC_NO  ) 

COBOL  —  CALL  "DLMIGRC"  USING 

TAG-NO 

FORTRAN  —  CALL  DLMIGRC  (TAGNO.RCNO) 


RC  NO. 


INPUT : 

INT  *  TAG_NO 
INT  * RC  NO 

OUTPUT : 


DESCRIPTION 

THIS  ROUTINE  USES  AN  ORACLE  SELECT  STATEMENT  TO 
RETRIEVE  ALL 

MIGRATING  KEY  CLASSES  GIVEN  A  TAG  NUMBER.  ROUTINES 
ARE  CALLED 

WHICH,  FOR  EACH  NEW  TAG  NUMBER  SELECTED.  DELETE  THE 
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INHERITED 

ATTRIBUTE  CLASS,  ATTRIBUTE  USE  CLASS,  COPY  CROSS 
REFERENCE  AND 

KEY  CLASS  MEMBER  ENTITIES  WHOSE  TAG  NUMBERS  MATCH. 
THE  QUERY  IS  PHRASED  SUCH  THAT  ONLY  THE  ATTRIBUTES 
INHERITED  THRU  A  SINGLE  RELATION  CLASS  ARE  DELETED, 

NOT  EVERYWHERE  THAT  ATTRIBUTE  IS  MIGRATED  TO. 

ARGUMENTS : 


TAG  NO  *=  INT  * 

RC  NO  =  INT  * 

RTNSTA  -  INT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


COSQL3 

ERRRPT 

COFETCH 

DELIAUC 

SPRINTF 

UERROR 

ADDRNUM 

DELKCMT 

DELAUCL 

COEXEC 

CODFINN 

COBINDN 


ORACLE  ROUTINE 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

ORACLE  ROUTINE 

DELETE  A  REORD  FROM  INHERITEDATT  USE 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  KE Y_CLAS  S_MEMBER 
DELETE  A  RECORD  FROM  ATTRIBUTE_USE_CL 
ORACLE  ROUTINE 
ORACLE  ROUTINE 
ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DRPMGRC  -  DELETE  MIGRATED  KEY  CLASS  MEMBERS  ASSOCIATED 

WITH  A  KEY  CLASS 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DOMUSAG 

DETERMINE  IF  DOMAIN  ASSOCIATED  WITH 

VIEWS, DATAFIELDS.ATTRIB 

VAX- 11  COBOL 

SUBROUTINE 

DOMUSAG 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


DETERMINE  IF  A  DOMAIN  BEING  DROPPED  IS  CURRENTLY 
BEING  ASSOCIATED  WITH  ANY  DATA  FIELDS 
VIEWS  OR  ATTRIBUTE  CLASSES. 

SELECT  THE  DATA  TYPE  NAME,  QUALIFYING  ON 
THE  DOMAIN  NUMBER  WHICH  IS  THE  UNIQUE 
NUMBER  ASSIGNED  TO  THE  DOMAIN  CLASS  BEING 
DROPPED . 


ARGUMENTS : 


DOM-NO  -  DSPLY  [S9(9)] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


VERDFDT 

VERDIDT 

ERRPRO 


DETERMINE  ANY  ASSOCIATIONS  OF  A  DATA  TYPE  WITH 
A  PROJECT  DF 

DETERMINE  IF  A  DATA  TYPE  IS  ASSOCIATED  WITH  ANY 
DATA  ITEMS 
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CALLED  DIRECTLY  BY: 

DRPDOM  -  PROGRAM  HAKE 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DPKCLST 

CREATE  AN  KE YCLASSLI ST  TABLE  CONTAINING 
ALL  THE  ENTITY 
C 

FUNCTION 
I  NT  () 

DPKCLST 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


CLASS  MEMBERS  IN  THE  STRUCTURE.  THIER 
KEY  CLASS  NOS  AND  NAMES  AND  KEY  CLASS  TAG 
NUMBERS  AND  NAMES. 


SYNOPSIS 

C 

COBOL 

FORTRAN 


DPKCLST (0MODELNO,  SEC  NO)  ; 

CALL  "DPKCLST"  USING 

MODEL -NO 
EC-NO. 

CALL  DPKCLSTC  MODELNO . ECNO ) 


INPUT: 

I NT  *  MODEL_NO  : 

I NT  ‘FROM  EC  NO  ; 


DESCRPIPTION : 
ARGUMENTS : 


MODELNO  -  I NT  * 

FROM  EC  NO  *  I NT  • 
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ROUTINES  CALLED: 


C0SQL3 

ERRRPT 

OOFETCH 

AKCROW 

STRNCPY 

COEXEC 

COBINDN 

CODFINN 


-  ORACLE  ROUTINE 

-  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

-  ORACLE  ROUTINE 

-  THIS  ROUTINE  ADDS  A  ROW  TO  THE  UNBOUNDED 

KEY_CLASS_LIST 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 

-  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 


USED  IN  MAIN  PROGRAM(S) : 


NDDL /MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NAME : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPAC 

DELETE  OWNED  ATTRIBUTES  ASSOCIATED  WITH 
ENTITY 

VAX- 11  COBOL 

SUBROUTINE 

DRPAC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


DRPAC  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 
OWNED  ATTRIBUTE  CLAUSE  IN  THE  ALTER  ENTITY 
COMMAND.  THE  CLAUSE  IS  OPTIONAL.  WHEN 
SPECIFIED.  MAY  BE  A  LIST  OF  ATTRIBUTE  NAMES. 

PROCESSING  CONTINUES,  REGARDLESS  OF 
ERRORS,  UNTIL  THE  LIST  OF  ATTRIBUTE 
NAMES  IS  EXHAUSTED. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9>] 
EC-NO  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

VERATT  -  VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  CLASS  IN  A 

MODEL 
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UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DELOAC  -  DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

ERRPRO 


CALLED  DIRECTLY  BY: 


ALTENT  -  CONTROL  PROCESSING  FOR  ALTER  ENTITY  CLASS 

COMMAND. 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DRPALI 

DROP  THE  ALIAS  FOR  AN 

VAX- 11  COBOL 

SUBROUTINE 

DRPALI 

-COB 

CDM 

PS41100 


ENTITY  OR  ATTRIBUTE. 


DROP  ALIAS  WILL  DROP  THE  ALIAS  FOR  AN  ENTITY 
OR  ATTRIBUTE. 

OBTAIN  OBJECT  ID,  OBJECT  TYPE  AND  ALIAS 
ID,  VERIFY  IF  THE  ALIAS  TO  BE  DROPPED  IS 
AN  ENTITY  OR  ATTRIBUTE,  THEN  CALL 
ROUTINES  TO  DELETE  THE  ALIASES.  CONTINUE 
PROCESSING  TILL  NO  MORE  RECORDS  TO  BE 
DELETED 


ARGUMENTS : 

MODEL-NO  -  DSPLY  [S9(9)] 

INCLUDE  FILES: 

LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERENT 

UERROR 

VERATT 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 
VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 
MODEL 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  CLASS  IN  A 
MODEL 
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GETECAL  -  VERIFIES  THE  EXI STANCE  OF  AN  ALIAS  FOR  AN  ENTITY 
GETACAL  -  VERIFY  THE  EXISTANCE  OF  AN  ALIAS  FOR  AN 

ATTRIBUTE 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Document at ion 


NAME : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPATT 

CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 

ATTRIBUTE  CLASSES  F 

VAX- 11  COBOL 

SUBROUTINE 

DRPATT 

-COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


-  THE  DROP  ATTRIBUTE  CLASS  COMMAND  PROCESSOR 
CONTROLS  THE  DROPPING  OF  USER  SPECIFIED 
ATTRIBUTE  CLASSES  FROM  THE  CDM. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

DELMTKC 

VERATT 

DELOAC 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 
VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  CLASS  IN  A 
MODEL 

DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 
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DELAC 

DELACNM 

DELACKW 

DELTEXT 

ADDRNUM 

OERROR 

CPFNXT 

ERRPRO 


DELETE  A  RECORD  FROM  ATTRI BUTECLASS 
DELETE  RECORD  CLASS  FROM  ATTRIBUTENAME  WHERE 
AC_NO 

DELETE  A  RECORD  FROM  AC_KEYWORD 
DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
ADD  A  AVAILABLE  HO  OF  A  POOL  NO  BACK  TO  HO 
LINKED 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPDB 

CONTROLS  THE  PROCESSING  LOGIC  FOR 
DELETING  THE  DATA  BASE. 

VAX- 11  COBOL 

PROGRAM 

DRPDB 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  THE 
DATA  BASE  FROM  THE  SYSTEM  AND  ALL  ENTITIES  ASSOCIATED  WITH 
THE  DATA  BASE.  DB  FROM  SCHEMA-NAMES,  DB  FROM  RECORD-TYPES, 
DB  FROM  DB-AREA-ASSIGNMENT,  DB  FROM  DATA-FIELD,  DB  FROM 
RECORD-SET.  DB  FROM  RECORD  SET-TYPE-MEMBERS,  DB  FROM 
RECORD-KEY,  DB  FROM  RECORD-KEY-MEMBER.  DB  FROM 

AUC-ST-MAPPING, 

DB  FROM  RC-BASED-REC-SET.  DB  FROM  IMS-SEGMENT-SIZE .  DB  FROM 
DATA-BASE-AREA,  DB  FRO  DF- SET-LINKAGE .  AND  DB  FROM 
S  EGMENT -DAT A -FI ELD . 

ADDITIONAL^  ALL  TEXTUAL  DESCRIPTIONS  ARE  DELETED  FOR  THE 
DATA  BASE  AND  ASSOCIATED  OBJECTS:  SET,  RECORDS,  AND  DATA 

FIELDS 

EACH  OBJECT  BEING  DELETED  WILL  HAVE  THEIR  UNIQUE  OBJECT 
NUMBERS  RETRUNED  TO  THE  CDM  FOR  REUSE. 


AFTER  EXTRACTING  THE  DBMS  NAME,  DATA  BASE  NAME  AND  HOST 
NAME  FROM  THE  PARSER  LISTS,  VERIFY  THAT  THE  DATA  BASE 
INFORMATION  IS  CORRECT,  AND  THEN  DELETE  THE  DATA  BASE  FROM 
THE  ASSOCIATED  ENTITIES. 

ASSOCIATED  WITH  THE  SETS,  AND 

ADD  THE  SET -NO  BACK  TO  THE  CDM  FOR  REUSE. 

DELDBST  IS  A  PRC  ( NDML )  ROUTINE. 
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INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERDBAS 

UERROR 

DELDBS1 

DELSN1 

DELDBRT 

DELDAA1 

DELDBDF 

DELDBST 

DELSTM1 
DELRKY1 
DELRKM1 
DELASM1 
DELRBR1 
DELI SSI 
DELDBA1 
DELDSL1 
DELSDF1 
PDFDB 

DELPCB 

DELTEXT 

ADDRNUM 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
CONVERT  A  STRING  TO  UPPER  CASE  CHARACTERS 
VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  HOST 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
DELETE  A  RECORD  FROM  DATABASE  ENITY 
DELETE  A  RECORD  FROM  SCHEMANAMES  ENITY 
DELETE  ALL  RECORD  TYPE  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  A  RECORD  FROM  DB_ ARE A_AS S I GNMENT  ENITY 
DELETE  ALL  DATA  FIELD  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  ALL  RECORD  SETS'  ASSOCIATIONS  WITH  THE 
DATABASE 

DELETE  A  RECORD  FROM  SET_TYPE_MEMBER  ENITY 
DELETE  A  RECORD  FROM  RECORD  KEY  ENITY 
DELETE  A  RECORD  FROM  RECORDKEYMEMBER  ENITY 
DELETE  A  RECORD  FROM  AUC_ST  MAPPING  ENITY 
DELETE  A  RECORD  FROM  RC_BASED RECSET  ENITY 
DELETE  A  RECORD  FROM  IMS_SEGMENT_SIZE  ENITY 
DELETE  A  RECORD  FROM  DATABASE  AREA  ENITY 
DELETE  A  RECORD  FROM  DFSETLINKAGE  ENITY 
DELETE  A  RECORD  FROM  SEGMENT  DATA_F I ELD  ENITY 
RETRIEVES  PROJECT  DATA  FIELDS  FOR  A  GIVEN  DATA 
BASE 

DELETE  A  RECORD  FROM  PSB_PCB  ENITY 
DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 


ERRPRO 


CALLED  DIRECTLY  BY: 


BRANCHR 


PERFORMS  MULTI-WAY  CALL  TO  THE 
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USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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WDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DRPDF 

DELETE  A  RECORD  FROM  DATAFIELD  ENITY 
C 

FUNCTION 
I  NT  () 

DRPDF 

-C 

CDM 

PS41100 


DESCRIPTION : 


SYNOPSIS 

C  —  DRPDF ( DF_NO ,  USTATUS) 

COBOL  —  CALL  "DRPDF**  USING 

DF-NO , 
STATUS . 


FORTRAN  --  CALL  DRPDF (DFNO,  STATUS) 


INPUT: 

I NT  *DF  NO; 

OUTPUT: 

I NT  • STATUS  ; 


DESCRPIPTION: 

THIS  ROUTINE  USES  ORACLE  CALLS  TO  DELETE  A  RECORD  FROM 
DATAFIELD 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


DF  NO  -  INT  • 

STATUS  -  INT  * 
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ROUTINES  CALLED: 


COSQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 

COEXEC  -  ORACLE  ROUTINE 

GOBINDN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


DELDFL2  -  CONTROLS  THE  DELETING  OF  DATA  FIELDS 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST : 


DRPDIV 

DELETE  DATA  ITEM  DESCRIPTION  TEXTS 

ASSOCIATED  WITH  VIEW 

VAX- 11  COBOL 

SUBROUTINE 

DRPDIV 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


EXTS  ASSOCIATED  WITH  VIEW 


DESCRIPTION  : - 


This  routine  will  given  a  view  number  select  all 
data  items  associated  with  the  view,  delete  all 
textula  descriptions  of  the  data  items  and 
send  the  cdm  the  deleted  data  item  numbers  for 
reuse . 


ARGUMENTS : 


VIEW-NO  -  DSPLY  [S9(9)] 
RETURN-STATUS  -  DSPLY  tS9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 
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DELTEXT 

ADDRNUM 

ERRPRO 


DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 


CALLED  DIRECTLY  BY: 

DRPVIEW  -  DROP  THE  VIEW. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPDOM 
PROGRAM  NAME 
VAX- 11  COBOL 
PROGRAM 
DRPDOM 
•  COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THE  DROP  DOMAIN  COMMAND  OBTAINS  THE  DOMAINS  TO  BE 

DROPPED.  AND  DELETES  THE  DOMAIN  CLASS  AND  ALL 
ASSOCIATED  DATA  TYPES. 

OBTAIN  DOMAIN  NAMES  FROM  PARSER  AND 

VERIFY  THA  THE  DOMAIN  TO  BE  DELETED  DOES 
EXIST.  THEN  CHECK  THE  DOMAIN  USAGE.  IF 
NOT  BEING  USED  BY  OTHERS.  DELETE  THE  DATA 
TYPES  AND  THE  DOMAIN.  CONTINUE 
PROCESSING  TILL  NO  MORE  DOMAINS  REMAIN  TO 

BE  DELETED. 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VERDOM 

UERROR 

VERACDT 

DOMUSAG 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THE  EXISTENCE  OF  A  DOMAIN  CLASS  IN  THE 
CDM 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
DETERMINE  ANY  ASSOCIATIONS  OF  A  DATA  TYPE  WITH 
ATTRIBUTE  CLASSES 

DETERMINE  IF  DOMAIN  ASSOCIATED  WITH 
VIEWS .DATAF I ELDS .ATTRIBUTES 
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<  I 

,V 


»% 
#  I 


S$] 

‘V,*1 


t'^l 


a 


v 


DELDTNO  -  DELETE  ALL  DATA  TYPES  ASSOCIATED  WITH  A  DOMAIN 
DELDTD  -  DELETE  RECORD  CLASS  FROM  USERDEF  DATA-TYPE 

DELDOM  -  DELETE  RECORD  CLASS  FROM  DOMAINCLASS 

ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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V, 


v  v  ** *  *  ' 
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I 


NDDL  COMMAND  PROCESSOR  Module  Documental i on 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPDT 


DROP  A  DATA  TYPE  WITHIN  A  DOMAIN. 

VAX- 11  COBOL 

SUBROUTINE 

DRPDT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  CLAUSE  WILL  DROP  A  DATA  TYPE  WITHIN  A 
DOMAIN  AFTER  VERIFYING  THAT  A  DATA  TYPE 
DOES  EXIST 

OBTAIN  DATA-TYPE-NAMES  FROM  THE  PARSER 
LISTS,  THEN  VERIFY  THAT  THE  DATA-TYPE- 
NAME  DOES  EXIST  IF  IT  DOES,  HAKE  SURE  IT 
IS  NOT  USED  BY  OTHERS,  AND  THEN  DELETE  IT 


ARGUMENTS : 


DOM-NO , DATA-TYPE-NAME  = 


ROUTINES  CALLED: 


VERDTD 

UERROR 

DTUSAGE 

DELDT 


VERIFY  THE  EXISTENCE  OF  A  DATA  TYPE  IN  A  GIVEN 
DOMAIN 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DETERMINE  ASSOCIATIONS  OF  A  DATA  TYPE 
DELETE  RECORD  CLASS  FROM  USER  DEF  DATA  TYPE 


CALLED  DIRECTLY  BY: 


PROCDT  -  PROGRAM  NAME 


USED  IN  MAIN  PROGRAM ( S ) : 
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NDDL/MAIN 


-  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPENT 

CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 
ENTITIES. 

VAX- 11  COBOL 
SUBROUTINE 
DRPENT 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THE  DROP  ENTITY  COMMAND  PROCESSOR  WILL  CONTROL  THE 
THE  PROCESSING  LOGIC  FOR  DELETING  ENTITIES  AND 
THEIR  ASSOCIATED  NAMES,  KEYWORDS.  DESCRIPTIONS, 
OWNED  ATTRIBUTE,  ATTRIBUTE  USE  CLASSES  AND 
RELATION  CLASSES 


ARGUMENTS : 


MODEL-NO  *  DSPLY  tS9(9)] 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED: 


CPFONE 

VERENT 

UERROR 

FNDOAC 

FNDAUC 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 
MODEL 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DELETES  ALL  OWNED  ATTRIBUTES  FOR  A  GIVEN  ENTITY 
CLASS 

DELETE  ALL  ATTRIBUTE  USE  CLASSES  FOR  A  GIVEN 
ENTITY  CLASS 
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DELMTKC 

DRPRCE 

DELECNM 

DELECKW 

DELEC 

ADDRNUH 

DELTEXT 

CPFNXT 


DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 
DROP  A  RELATION  CLASS  FOR  AN  ENTITY  BEING 
DROPPED 

DELETE  THE  RECORD  FROM  ENTITYNAME 
DELETE  A  RECORD  FROM  ECKEYWORD 
DELETE  THE  RECORD  FROM  ENTITY  CLASS 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 

USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPFLD 

CONTROLS  THE  PROCESSING  LOGIC  FOR 
DROPPING  A  DATA  FIELD. 

VAX- 11  COBOL 
PROGRAM 
DRPFLD 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DROPPING  A 
DATA  FIELD  FROM  THE  DATA  BASE. 


FETCH  THE  DATA  BASE  ID.  RECORD  TYPE  AND  DATA  FIELD  AFTER 
VERIFYING  THAT  THE  DATA  FIELD  DOES  EXIST.  DELETE 
THE  FIELD  AND  ITS  ASSOCIATIONS.  REPEAT  TILL  NO  MORE 
DATA  FIELDS  REMAIN. 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 
U ERROR 
VERDBAS 
VERDFLD 

ADDRNUM 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  HOST 
VERIFIES  THE  EXISTENCE  OF  A  DATA  FIELD  FOR  A 
GIVEN  DATA  BASE 

ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 


3-576 


PS  620141100 
1  November  1985 


DELTEXT 

VERDSL3 

DELDSL3 

DELSTM3 

DELRST3 

DELASM2 

DELRBR3 

DELSDF3 

DELDFL3 

DELRKM3 

DELRKY2 

PDFDF 

CPFNXT 

ERRPRO 


LINKED 

DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
RETRIEVES  SET  ID  FOR  TOTAL  DATA  BASE 
DELETE  A  RECORD  FROM  DF  SET  LINKAGE  ENITY 
DELETE  A  RECORD  FROM  SETTYPE  MEMBER  ENITY 
DELETE  A  RECORD  FROM  RECORDSET  ENITY 
DELETE  A  RECORD  FROM  AUC_ST_MAPPING  ENITY 
DELETE  A  RECORD  FROM  RC_ BA S ED_REC_ SET  ENITY 
DELETE  A  RECORD  FROM  SEGMENT  DATA  FIELD  ENITY 
DELETE  A  RECORD  FROM  DATAFIELD  ENITY 
DELETE  A  RECORD  FROM  RECORD  KEY  MEMBER  ENITY 
DELETE  A  RECORD  FROM  RECORD  KEY  ENITY 
RETRIVES  ALL  THE  PROJ  DATA  FIELD  OR  DF  BEING 
DROPPED 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL  MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPKC 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
"DROP  KEY  CLASS". 

VAX- 11  COBOL 

SUBROUTINE 

DRPKC 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP  KEY 
CLASS"  CLAUSE  IN  THE  ALTER  ENTITY  COMMAND.  THE 
CLAUSE  CONSISTS  OF  A  LIST  OF  ONE  OR  MORE  KEY 
CLASS  NAMES. 


ARGUMENTS : 


EC-NO  -  DSPLY  t  S9(9 ) ] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERR PRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

VERKC  -  VERIFY  THE  EXISTENCE  OF  A  KEY  CLASS  IN  A  MODEL 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

VERCRC  -  DETERMINE  IF  A  KEY  CLASS  IS  PART  OF  A  COMPLETE 

RELATION 

-  DELETE  MIGRATED  KEY  CLASSES  ASSOCIATED  WITH  A 
KEY  CLASS 


DRPMGKM 
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DELS CM 
DCLCMPR 
DELKC 
adorbuh 

CPFBIT 
err pro 


DELETE  A  RECORD  FROM  KEY  CLAES  N EMBER 
DELETE  A  R BOOED  FROM  COMPLETE  RELATION 
DELETE  A  RECORD  FROM  EEY  CLASS 
ADD  A  AVAILABLE  BO  OF  A  FOOL  BO  BACK  TO  BO 
LIBKED 

ACCESS  TEE  BEST  TOKKH  IB  A  PARSER  LIST 


CALLED  DIRECTLY  BY 


ALTEBT  OOBTROL  PROCESS  1 BC  FOR  ALTER  EBTITY  CLASS 

OOMMABD 

USED  IH  HAIR  PROGRAM!  S  i 


BDDL  HAIR 


HAIR  PROGRAM  fOR  THE  BDDL  OOMMABD  PROCESSOR 
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IDOL  COMMAND  PROCESSOR  Module  Documentation 


NAME 

PURPOSE 

LANGUAGE 
NODULE  TYPE 
SOURCE  PILE 
SOURCE  PILE  TYPE 
N08T 

SUSSYSTEM 
SURD I  RECTORY 
DOCUMENTATION  GROUP 


DRPEV 

DROP  A  KEYWORD  ASSOCIATION  PROM  EITHER  AM 
ATTR I NOTE . ENTITY 
VAX -11  OOROL 
SURROUTINE 
DRPEV 
OOR 


CDM 


PS4  1  1  00 


DESCRIPTION 

DROP  KEYWORD  CLAUSE  WILL  DROP  A  KEYWORD 
ASSOCIATION  PROM  EITHER  AN  ATTR I TOTE  ENTITY 
OR  RELATION  CLASS  THIS  CLAUSE  IS  CALLED  PROM 
THE  ALTER  ENTITY.  ATTR I MUTE  AND  RELATION  COMMANDS 


ARGUMENTS 

OBJ  TYPE  -  RECRD 
OBJ  ID  -  DSPLY  {  SQ<  9  )  ) 

RTN  STATUS  -  DSPLY  ( S®( 9 ) ] 

INCLUDE  PILES 

L1STN0S  VALID  LIST  NUMBERS 


ROUTINES  CALLED 


CPFORE 
LOWUPP 
VERKV 
U ERROR 
DELE VAC 
DELKWEC 
DELKWRC 
CPFNXT 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
COM VERT  A  STRING  TO  UPPER  CASE  CHARACTERS 
verify  the  existence  of  a  keyword. 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

DELETE  A  RECORD  FROM  AC  KEYWORD 

DELETE  A  RECORD  FROM  EC  KEYWORD 

DELETE  A  RECORD  FROM  RC  KEYWORD 

ACCESS  THE  MEXT  TOKEN  IN  A  PARSER  LIST. 
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CALLED  DIRECTLY  BY: 


ALTENT  -  CONTROL  PROCESSING  FOR  ALTER  ENTITY  CLASS 

COMMAND. 

ALTREL  -  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER 

RELATION  COMMAND 

ALTATT  -  THE  ALTER  ATTRIBUTE  COMMAND  PROCESSOR  ALTERS 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIM  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOrT : 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DRPKWC 

OBTAIN  THE  USED  IDENTIFIED  KEYWORD. 

DROP  THEIR  ASSOCIA 

VAX- 11  COBOL 

PROGRAM 

DRPKWC 

.COB 

CDM 

PS41100 


THEM 


DESCRIPTION: 


OBTAIN  THE  USED  IDENTIFIED  KEYWORD.  THEM 
DROP  THEIR  ASSOCIATIONS  WITH  ATTRIBUTE  CLASS. 
ENTITIES  AND  RELATIONS  AND  THEM  DROP  THE 
KEYWORD. 


FOR  EACH  KEYWORD  OBTAINED.  VERIFY 
THAT  THE  KEYWORD  DOES  EXIST.  THEN 
DELETE  THE  ITS  ASSOCIATION  WITH 
ATTRIBUTES.  ENTITIES.  RELATION  CLASS. 
AND  FINALLY  THE  KEYWORD  ITSELF.  THE 
ADD  THE  KEYWORD  NUMBER  BACK  TO  THE 
REUSABLE  POOL  OF  KEYWORD  NUMBERS. 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VERKW 

UERROR 

DELKWAC 

DELKWEC 

DELKWRC 


-  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

-  verify  the  existence  of  a  keyword. 

-  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

-  DELETE  A  RECORD  FROM  ACKEYWORD 

-  DELETE  A  RECORD  FROM  EC  KEYWORD 

-  DELETE  A  RECORD  FROM  RC  KEYWORD 


3-582 
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DE1XV 

DELTEXT 

ADMUfUM 

CPFMXT 


DELETE  A  RECORD  PROM  ACKEYVORD 
DELETE  A  RECORD  PROM  DESCTEXT  EM ITT 
ADD  A  AVAILABLE  BO  OP  A  POOL  MO  BACK  TO  BO 
LIBKED 

ACCESS  THE  BEXT  TOKKB  XR  A  PARSER  LIST. 


CALLED  DIRECTLY  BY: 

BRABCHR  -  PERFORMS  MULTI -WAY  CALL  TO  THE 

USED  IB  MAIM  PROGRAM(S): 

HDDL/MAIR  -  MAIB  PROGRAM  POR  THE  BDDL  COMMA'  PROCESSOR 


PS  620141100 
1  November  1965 


NDDL  COMMAND  FROCKS  SOU  Nodul*  DoouacnUt  i  on 


MANE: 

PURP08E 
LANGUAGE 
NODULE  TYPE 
PUMCTIOM  TYPE 
SOURCE  PILE: 

SOURCE  PILE  TYPE 
MOST 

SUBSYSTEH 
SUBDIRECTORY 
DOCUNEMTATIOM  GROUP 


DRPNAP 

COMMAND  PROCESSOR  POP  THE  DROP  HAP  COMMAND 

C 

FUNCTION 
I  NT  (  ) 

DRPNAP 

C 

COM 

PSA  1  1 OO 


DESCRIPTION 


SYNOPSIS 

C  DRPNAP 

COBOL  CALL  'DRPNAP 


FORTRAN  CALL  DRPNAP 


INPUT 


OUTPUT 


DESCRIPTION 

DRPNAP  IS  THE  COMMAND  PROCESSOR  FOR  THE  DROP  NAP 
COMMAND  AFTER 

VERIFYING  THE  HAP  NAME.  A  ROUTINE  IS  CALLED  WHICH 
REMOVES  THE  MAP 
FROM  THE  DATABASE 


PS  020141100 
1  Moves ber  1085 


INCLUDE  PILES: 


STDTTP  -  STANDARD  TYPE  DEPIMITIOMS 

LISTID  -  PROVIDES  LIST  OP  PARSED  OBJECTS 


ROUTINES  CALLED: 


CPPORE 

VERENT 

SPRINTP 

U ERROR 

DELRC8T 

VERRCST 

DELPDPT 

DELASH 

PDPSRCM 

VERASH 

CPFMXT 

VERREL 

VERAUC 


EXTRACT  THE  PIR8T  TOKEN  PROM  THE  NAMED  LIST 
VERIPT  THE  EXISTENCE  OP  AM  ENTITY  CLASS  IN  A 
MODEL 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
DELETE  RECORD  CLASS  PROM  RC  BASED  REC  SET 
REPORT  WHETHER  A  RC  TO  SET  MAP  EXISTS 
DELETE  A  RECORD  PROM  PROJECT  DATA  FIELD  EM ITT 
DELETE  PROM  ATTRIBUTE  USE  CLASS  MAPPING 
DETERMINES  IP  A  TAG  NAS  A  PRIMARY  MAP  TO  DATA 
FIELD 

DETERMINE  IP  AMY  AUC/BET  MAPPINGS  EXIST  FOR  AM 
AUC 

ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST 
VERIFY  TNS  DEPENDENT  AND  INDEPENDENT  ENTITIES 
IN  THE  RELATION 

VERIFY  THE  EXISTENCE  OP  AN  ATTRIBUTE  USE  CLASS 


CALLED  DIRECTLY  BY 


BRANCMR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  1M  MAIN  PROGRAM ( S ) 

MDDL  MAIM  -  MAIM  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 


3-585 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

SOURCE  PILE: 

SOURCE  TILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION 


DRPMGKM 

DELETE  MIGRATED  KEY 

WITH  A  KEY  CLASS 

VAX- II  COBOL 

SUBROUTINE 

DRPMGKM 

.PRC 

CDM 

PS41 100 


CLASSES  ASSOCIATED 


GIVEN  A  KEY  CLASS.  DELETE  ALL  ITS  MIGRATING  KEY 
CLASS  MEMBERS 

EXECUTE  AN  NDML  SELECT  STATEMENT  TO 
RETRIEVE  ALL  THE  KEY  CLA8S  MEMBERS  FOR 
THIS  KEY  CLASS  BY  TAG  NO  FOR  EACH  KEY 
CLASS  MEMBER  RETRIEVED.  DELETE  THE  KEY 
CLASS  MEMBER  AND  IT8  MIGRATIONS;  IE. 

ATTRIBUTE  USE  CLAS8  AND  INHERITED 
ATTRIBUTE  USE  CLASS 


ARGUMENTS 


KC-MO  -  DSPLY  [ S9( 9  )  ] 
RETURN-STATUS  -  DSPLY  (S9(9)J 


INCLUDE  FILES 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE- FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELMIGK  -  DELETE  MIGRATING  KEY  CLASS 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ERRPRO 


PS  620141100 
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CALLED  DIRECTLY  BY: 

DRPKC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  "DROP  KEY 

CLASS" . 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-587 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  DRPMGRC 

PURPOSE:  DELETE  MIGRATED  KEY  CLASS  MEMBERS 

ASSOCIATED  WITH  A  KEY  CLA 
LANGUAGE:  VAX- 11  COBOL 

MODULE  TYPE:  SUBROUTINE 

SOURCE  FILE:  DRPMGRC 

SOURCE  FILE  TYPE:  .PRC 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


GIVEN  A  KEY  CLASS  AND  A  RELATION  CLASS.  DELETE 

ALL  OF  THE  MIGRATING  KEY  CLASS  MEMBERS  THRU  THIS 
RELATION  CLASS. 

EXECUTE  AN  NDKL  SELECT  STATEMENT  TO 
RETRIEVE  ALL  THE  KEY  CLASS  MEMBERS  FOR 
THIS  KEY  CLASS  BY  TAG  NO.  FOR  EACH  KEY 
CLASS  MEMBER  RETRIEVED.  DELETE  THE  KEY 
CLASS  MEMBER  AND  ITS  MIGRATIONS :  IE 
ATTRIBUTE  USE  CLASS  AND  INHERITED 
ATTRIBUTE  USE  CLASS. 


ARGUMENTS : 


KC-NO  -  DSPLY  [ S9(9) ] 

RC-NO  -  DSPLY  :S9(9)J 
RETURN -STATUS  -  DSPLY  [S9(9)J 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DLMIGRC  -  DELETE  MIGRATING  KEY  CLASS 


PS  620141100 
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UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 


DRPMIG  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ‘DROP 

MIGRATES"  CLAUSE. 

DRPREL  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  'DROP 

RELATION*  COMMAND. 


USED  IN  MAIN  PROGRAM(S): 


NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141 100 
1  November  1965 


MDDL  COMMAND  PROCESSOR  Nodule  Documentation 


NAME 

PURPOSE 


LANGUAGE 
NODULE  TYPE 
SOURCE  FILE 
SOURCE  FILE  TYPE 
HOST 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENTATION  GROUP 

DESCRIPTION 


DRPHIG 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
‘DROP  MIGRATES*  CLAUS 
VAX- 11  COBOL 
SUBROUTINE 
DRPHIG 
COB 

COM 

PS41 100 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ‘DROP 
MIGRATES*  CLAUSE  THE  CLASUE  IS  OPTIONAL 
WHEN  SPECIFIED.  CONSISTS  OF  A  KEY -CLAUSE -NAME 


ARGUMENTS 


MODEL  NO  -  DSPLY  [ S9( 9 ) ] 
RC  NO  -  DSPLY  ( S9( 9 ) ] 
IND-EC-NO  -  DSPLY  lS9<9)] 


INCLUDE  FILES 


LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

VERKC  -  VERIFY  THE  EXISTENCE  OF  A  KEY  CLASS  IN  A  MODEL 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

VERRCC  -  verify  if  the  relation  class  is  complete. 

DRPMGRC  -  DELETE  MIGRATED  KEY  CLASS  MEMBERS  ASSOCIATED 

WITH  A  KEY  CLASS 

-  DELETE  A  RECORD  FROM  COMPLETE  RELATION 


DELCPRC 
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CALLED  DIRECTLY  BY: 


ALTREL  -  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER 

RELATION  COMMAND 

USED  IN  HAIM  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPMOD 

CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A 
MODEL. 

VAX- 11  COBOL 
SUBROUTINE 
DRPMOD 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A  MODEL 
-  IE  ENTITIES,  ATTRIBUTES,  KEYWORDS,  RELATIONS,  VIEWS,  ETC. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 
ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

UERROR 

VERMOD 

DELMOD 

DELTEXT 

FNDECM 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
verify  the  existence  of  a  model  and  return  the 
unique  number. 

DELETE  A  RECORD  FROM  MODELCLASS  ENITY 

DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

DELETES  ALL  ENTITIES  AND  ASSOCIATED  OBJECTS  FOR 
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A  GIVEN  MODEL 

FNDACM  -  DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN  MODEL 

ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

UWARN  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


g 

1 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DRPRCE 

DROP  A  RELATION  CLASS 

DROPPED 

VAX- 11  COBOL 

SUBROUTINE 

DRPRCE 

.PRC 


FOR  AN  ENTITY  BEING 


HOST: 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


E 

L 


DRPRCE  WILL  DROP  A  RELATION  CLASS  BASED  ON  AN 
ENTITY  CLASS  NUMBER  THAT  IS  TO  BE  DELETED. 


ADDITIONALLY  THIS  ROUTINE  WILL  DELETE  ALL  TEXTUAL 
DESCRITPTIONS  ASSOCIATED  WITH  THE  RELATION  AND 
ADD  THE  RELATION-CLASS  NUMBER  BACK  INTO  THE  CDM' 
FOR  REUSE. 


ARGUMENTS : 


EC-NO  -  DSPLY  [S9(9) ] 
RETURN-STATUS  -  DSPLY  [S9(9>] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELRC  -  DELETE  A  RECORD  FROM  RELATIONCLASS 

ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 


3-594 
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DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

DELRCKW  -  DELETE  A  RECORD  FROM  RCKEYWORD 

ERRPRO 


CALLED  DIRECTLY  BY: 

DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES. 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-595 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


DRPREC 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
DROP  RECORD  COMMAND. 

VAX- 11  COBOL 
PROGRAM 
DRPREC 
.COB 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
DROP  RECORD  COMMAND. 

«••••*••*  SPECIAL  NOTICE  *****••*»•»**** 

SPECIAL  NOTE:  THIS  ROUTINE  IS  SET  UP  TO  HANDLE 
RECORD,  DATAFIELD,  AND  SET  NUMBERS  IN  THE  CDM 

IT  WILL  ALSO  DELETE  TEXTUAL  DESCRIPTIONS  IN 
THE  DESC_TEXT  TABLE  AND  ADD  REUSABLE  OBJECT 
NUMBERS  TO  THE  CDM  REUSABLE  NUMBER  TABLE. 

THIS  IS  RELEASED  UNDER  VERSION  1.6 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


GETDRT 

UERROR 

DELRTY2 

ADDRNUM 


FETCH  DATA  BASE,  RECORD  TYPE  INFO  FROM  PARSER 
LISTS 

ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
DELETE  A  RECORD  FROM  RECORD_TYPE  ENITY 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 


3-596 
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DELTEXT 

DELDAA2 

DELDFL2 

PDFREC 

DELRKY2 

DELRKM2 

DELISS2 

DELSDF2 

DELDSL2 

SELRSET 

SELSTM 


LINKED 

DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 
DELETE  A  RECORD  FROM  DB_ ARE A_ ASSIGNMENT  ENITY 
CONTROLS  THE  DELETING  OF  DATA  FIELDS 
RETRIEVES  ALL  PORJECT  DATA  FIELDS  FOR  A  GIVEN 
RECORD 

DELETE  A  RECORD  FROM  RECORDKEY  ENITY 
DELETE  A  RECORD  FROM  RECORDKEYMEMBER  ENITY 
DELETE  A  RECORD  FROM  IMSSEGMENTSIZE  ENITY 
DELETE  A  RECORD  FROM  SEGMENTDATAFIELD  ENITY 
DELETE  A  RECORD  FROM  DFSETLINKAGE  ENITY 
DELETE  ALL  ASSOCIATIONS  IN  THE  CDM  FOR  A  SET 
BEING  DROPPED 

DELETES  ALL  OWNER /MEMBERS  OF  THE  RECORD  TYPE 
BEING  DROPPED 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DRPREL 

CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 

“DROP  RELATION”  COMMA 

VAX- 11  COBOL 

SUBROUTINE 

DRPREL 

.COB 

CDM 

PS41100 


DESCRIPTION: 


DRPREL  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
"DROP  RELATION"  COMMAND. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  tS9(9)] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


!  ROUTINES  CALLED: 


CPFONE 

CPFNXT 

VERREL 

UERROR 

VERRCC 

DRPMGRC 

DELCPRC 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

VERIFY  THE  DEPENDENT  AND  INDEPENDENT  ENTITIES 
IN  THE  RELATION 

ISSUE  A  MESSAGE  TO  THE  USER ,  CONSIDERED  A 
verify  if  the  relation  class  is  complete. 
DELETE  MIGRATED  KEY  CLASS  MEMBERS  ASSOCIATED 
WITH  A  KEY  CLASS 

DELETE  A  RECORD  FROM  COMPLETE  RELATION 
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DELRC  -  DELETE  A  RECORD  FROM  RELATIONCLASS 

DELRCKW  -  DELETE  A  RECORD  FROM  RCKEYWORD 

ADDRNUM  -  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 


BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPSET 

CONTROLS  THE  PROCESSING  LOGIC  FOR 

DELETING  A  SET  FROM  THE  D 

VAX- 11  COBOL 

PROGRAM 

DRPSET 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DELETING  A  SET 
FROM  THE  DATABASE. 


THIS  ROUTINE  FETCHES  INFORMATION  REGARDING  THE  DATA  BASE  AND 
THE  SET  TO  BE  DROPPED.  AFTER  VERIFYING  THAT  THE  SET  DOES 
EXIST.  IT  IS  DELETED  FROM  THE  DATA  BASE. 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CPFONE 

VERDBAS 

UERROR 

VERRSET 

DELRST2 

DELSTM2 

DELASM2 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  HOST 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
VERIFIES  THE  EX I STANCE  OF  A  SET. 

DELETE  A  RECORD  FROM  RECORDSET  ENTITY 
DELETE  A  RECORD  FROM  SET_TYPE_MEMBER  ENTITY 
DELETE  A  RECORD  FROM  AUC  ST  MAPPING  ENITY 


3-600 
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DELRBR2 

DLDSL2 

ADDRNUM 

DELTEXT 

ERRPRO 


DELETE  A  RECORD  FROM  RC_BASED_REC_SET  ENITY 
DELETE  A  RECORD  FROM  DFSETLINKAGE  ENTITY 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

DELETE  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Docu»entat ion 


NAME :  DRPSMAP 

PURPOSE:  DROP  A  1 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTIO: 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  DRPSMAP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


DRPSMAP 

DROP  A  SINGLE  MAPPING 
C 

FUNCTION 
INT  () 

DRPSMAP 

.C 


SYNOPSIS 


DRPSMAP  (MAP  TYPE ,0TAG  NO, PRC  NO) 


COBOL 


CALL  -DRPSMAP’ 


FORTRAN 


USING 
MAP_TYPE 
TAGNO 
RC  NO. 


CALL  DRPSMAP  ( MAPTYPE . TAGNO . RCNO ) 


INPUT: 

CHAR  MAP  TYPEN 
INT  *TAG_NO 
INT  *  RC_NO 
OUTPUT : 


DESCRIPTION 

DETERMINE  WHETHER  MAP  TO  BE  DROPPED  IS  PRIMARY  OR 
SECONDARY . 

IF  PRIMARY,  ENSURE  THAT  THERE  ARE  NO  OTHER  MAPPINGS. 
DEPENDING  ON  THE  MAP  TYPE,  CALL  THE  APPROPRIATE  DELETE 
ROUTINE . 

ARGUMENTS : 


3-602 


WAT* 
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MAP  TYPE  - 
TAG  NO  - 
RC  MO  - 

CHAR 
I  NT  * 

I  NT  * 

[] 

INCLUDE  FILES: 

STDTYP 

STANDARD 

TYPE 

DEFINITIONS 

LISTID 

PROVIDES 

LIST 

OF  PARSED  OBJECTS 

ROUTINES  CALLED: 


CPFNXT 

CPFCOR 

FNDRCM 

VERPDF 

VERDB 

FNDASM 

TOLOWER 

GETMAPC 

STRNCMP 
SPRINTF 
UERROR 
DELIRCS 
DELI ASM 
DELI PDF 


ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

ACCESS  A  TOKEN  IN  A  CORRESPONDING  NAMED  LIST 
RETRIEVES  ALL  RC/RT  MAPPINGS  FOR  A  NAMED  RECORD 
verify  the  existence  of  a  pro jectdataf ield 
occurrence . 

VERIFY  THE  EXISTENCE  OF  A  DATA  BASE  IN  THE  CDM 
DETERMINES  IF  AN  AUC  TO  SET  TYPE  MAPPING  EXISTS 

SELECT  ALL  PROJECT  DATA  FIELDS  MATCHING  A  GIVEN 
TAG  NO 


ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DELETE  RECORD  CLASS  FROM  RC  BASED REC  SET 
DELETE  RECORD  CLASS  FROM  AUCST  MAPPING 
DELETE  RECORD  CLASS  FROM  PROJECT  DATA  FIELD 


CALLED  DIRECTLY  BY: 


ALTMAP  -  ALTER  MAP  COMMAND  PROCESSOR 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIH 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DRPVIEW 

DROP  THE  VIEW. 

VAX- 11  COBOL 

PROGRAM 

DRPVIEW 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


EXTRACT  THE  VIEW  NAME,  AND  DROP  THE  CORRESPONDING 

DATA  ITEM,  PROJECT  DATA  ITEM,  SEC  ANDSEC-RC- 
COMPONENT . 


SELECT  THE  FIRST  VIEW-NAME  AND  VERIFY  * 

ASSOCIATED  DATA  ITEM,  PROJECT  DATA  ITEM, 
SEC  AND  SEC-RC-COMPONENT .  NOW  ADD  THE 
UNIQUE  VIEW  NUMBER.  REPEAT  THE  PROCESS 
FOR  THE  OTHER  VIEWS  TO  BE  DROPPED. 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 


ROUTINES  CALLED: 


CPFONE 

VERVIEW 

UERROR 

DELPDI 

DELSECR 

DRPDIV 

DELDIV 
DELS EC 
ADDRNUM 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
verify  the  existence  of  a  view  in  the  system. 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DELETE  RECORD  CLASS  FROM  PRO JECT_DATA_ ITEM 
DELETE  RECORD  CLASS  FROM  SEC_RC_COMPONENT 
DELETE  DATA  ITEM  DESCRIPTION  TEXTS  ASSOCIATED 
WITH  VIEW 

DELETE  FROM  DATA_ITEM  WHERE 

DELETE  RECORD  CLASS  FROM  SEC 

ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 


3-604 
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LINKED 

DELTEXT  -  DELETE  A  RECORD  FROM  DESCTEXT  ENITY 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST. 

CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


DTUSAGE 

DETERMINE  ASSOCIATIONS  OF  A  DATA  TYPE 

VAX- 11  COBOL 

SUBROUTINE 

DTUSAGE 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


DETERMINE  IF  THE  DATA  TYPE  BEING  DROPPED  ARE 

ASSOCIATED  WITH  ANY  DATA  FIELD.  DATA  ITEMS  OR 
ATTRIBUTE  CLASS. 


VERIFY  IF  DATA  FIELD.  DATA  ITEM  AND 

ATTRIBUTE  CLASS  IS  ASSOCIATED  WITH  THE 

DATA  TYPE. 


ARGUMENTS : 


DOM-NO  -  DSPLY  [S9(9)] 

DATA -TYPE -NAME  -  DSPLY  [X(30)] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


ROUTINES  CALLED: 


VERDFDT  -  DETERMINE  ANY  ASSOCIATIONS  OF  A  DATA  TYPE  WITH 

A  PROJECT  DF 

VERDIDT  -  DETERMINE  IF  A  DATA  TYPE  IS  ASSOCIATED  WITH  ANY 

DATA  ITEMS 

VERACDT  -  DETERMINE  ANY  ASSOCIATIONS  OF  A  DATA  TYPE  WITH 

ATTRIBUTE  CLASSES 


CALLED  DIRECTLY  BY: 


DRPDT  -  DROP  A  DATA  TYPE  WITHIN  A  DOMAIN. 


3-606 


PS  620141100 
1  November  1985 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-607 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


ENTKW 

SEARCH  FOR  ENTITY  KEYWORD  MATCHES  WITHIN 

TWO  MODELS 

VAX- 11  COBOL 

SUBROUTINE 

ENTKW 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  TO  POPULATE  A 
KEYWORD  TABLE  WITH  ENTITY  CLASS  KEYWORDS  OF  ONE  MODEL.  THEN 
SEARCHES  THIS  TABLE  FOR  MATCHES  FROM  THE  SECOND  MODEL. 


ARGUMENTS : 


MOD-NOl  -  DSPLY  [S9(9)] 
MOD-N02  -  DSPLY  [S9(9)3 
MOD-NAME 1  =  DSPLY  [X(30)l 
MOD-NAME2  -  DSPLY  [X(30)] 


INCLUDE  FILES: 


KWDTBL  -  KEYWORD  TABLE 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


I  ROUTINES  CALLED: 

l 


RETECKW  -  POPULATES  KEYWORD  TABLE  FOR  ENTITY  CLASS 

KEYWORDS 

RECK W 2  -  COMPARES  ENTITY  CLASS  KEYWORDS  BETWEEN  MODELS 

ERRPRO 


3-608 

1 
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■M 

*1 


CALLED  DIRECTLY  BY: 

CNPMOD  -  CONTROLS  THE  PROCESSING  LOGIC  TO  COMPARE  TWO 

MODELS . 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-609 
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NDDL  COMMAND  PROCESSOR  Module  Documentat i on 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


ERRRPT 

HANDLE  ANY  ERROR  CODE  FROM  ORACLE > 
C 

FUNCTION 
I  NT  () 

ERRORS 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SYNOPSIS 

C  --  ERRRPT (  RETCODE.  MESG,  MOD  NAME) 

COBOL 

CALL  "ERRRPT”  USING 


FORTRAN  -- 

INPUT: 

RETCODE  -- 
MESG 


l 


I 

t 


MOD  NAME 


RET-CODE , 

MESG-DESC . 

MODULE-NAME . 
CALL  ERRRPT ( RETCOD ,  MESG,  MODNAM) 


THE  ORACLE  ERROR  CODE. 

A  CHARACTER  STRING  CONTAINING  THE  ERROR 
MESSAGE  FOR  THE  ERROR  LOG. 

--  THE  NAME  OF  THE  MODULE  EXPERIENCING 
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THE  ORACLE  ERROR. 


OUTPUT : 


DESCRIPTION 

COMBINE  THE  RETURN  CODE.  THE  MESSAGE.  AND  THE 

MODULE  NAME  INTO  A  SINGLE  MESSAGE  AND 

USE  " ERRPRO "  TO  PUT  IT  INTO  THE  ERROR  LOG. 

THEN  CALL  THE  ORACLE  ROUTINE  OERMSG  TO 
TO  GET  THE  EXPANDED  ERROR  MESSAGE. 

AND  PLACE  THE  ORACLE  ERROR  MESSAGE  ON  THE  LOG. 

ARGUMENTS : 


RETCODE  -  I NT 

MESG  -  CHAR  • 

MOD  NAME  -  CHAR  * 


INCLUDE  FILES: 


NDDL  -  ••••  PURPOSE  NOT  FOUND  BY  STRIPPER  •*** 

CMDS  -  COMMAND  NO.  FOR  EACH  NDDL/NDML  COMMAND 


ROUTINES  CALLED: 


SPRINTF 

ERRPRO 

COERMSG  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


ALLATT 

ALLENT 

ALLREL 

ALTSMAP 

BLOOPCK 

BLRCKC 


SELECT  ALL  THE  ATTRIBUTES  IN  FROM -MODEL  AND 
GENERATE 

SELECT  ALL  THE  ATTRIBUTES  IN  FROM-MODEL  AND 
GENERATE 

FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL 
GENERATE 

ALTER  A  SINGLE  MAP 

CHECK  FOR  LOOPS  FROM  THE  ENTITY  GIVEN  UP  THE 
HIERARCHY 

FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL  FIND 
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BLRCKC1 

CHKLOOP 

COMMIT 

DELI PDF 

DELAC 

DELACAL 

DELACKW 

DELACNM 

DELASM 

DELASM1 

DELASM2 

DELAUCL 

DELCMPR 

DELCPRC 

DELDAA1 

DELDAA2 

DELDBA1 

DFLDBS1 

DELDFL1 

DELDFL2 

DELDFL3 

DELDIV 

DELDOM 

DELDSL1 

DELDSL2 

DELDSL3 

DELDT 

DELDTD 

DELEC 

DELECAL 

DELECKW 

DELECNM 

DELI ASM 

DELIAUC 

DELI AUK 

DELI PDF 

DELIRCS 

DELI SSI 

DELISS2 

DELKC 

DELKCM 

DELKCMT 

DELKW 

DELKWAC 

DELKWEC 

DELKVRC 


FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 
CHECK  LOOP  DEPENDENCY  AND  FOR  TOPS  AND  BOTTOMS 
STORE  THE  REUSEABLE  NUMBER  TO  THE  DATA  BASE. 
DELETE  A  RECORD  FROM  PRO JECTDATAFI ELD  ENITY 
DELETE  A  RECORD  FROM  ATTRI BUTECLASS 
DELETE  RECORD  CLASS  FROM  ATTRIBUTENAME 
DELETE  A  RECORD  FROM  ACKEYVORD 
DELETE  RECORD  CLASS  FROM  ATTRIBUTENAME  WHERE 
AC_NO 

DELETE  FROM  ATTRIBUTE  USE  CLASS  MAPPING 
DELETE  A  RECORD  FROM  AUC_ST_MAPPING  ENITY 
DELETE  A  RECORD  FROM  AUC_ST_MAPPING  ENITY 
DELETE  A  RECORD  FROM  ATTRIBUTE  USECL 
DELETE  A  RECORD  FROM  COMPLETERELATION 
DELETE  A  RECORD  FROM  COMPLETE  RELATION 
DELETE  A  RECORD  FROM  DB_AREA_AS S I GNMENT  ENITY 
DELETE  A  RECORD  FROM  DB  AREAASSIGNMENT  ENITY 
DELETE  A  RECORD  FROM  DATABASE  AREA  ENITY 
DELETE  A  RECORD  FROM  DATA  BASE  ENITY 
DELETE  A  RECORD  FROM  DATAFIELD  ENITY 
CONTROLS  THE  DELETING  OF  DATA  FIELDS 
DELETE  A  RECORD  FROM  DATA_FIELD  ENITY 
DELETE  FROM  DATA_ITEM  WHERE 
DELETE  RECORD  CLASS  FROM  DOMAIN  CLASS 
DELETE  A  RECORD  FROM  DF_SET  LINKAGE  ENITY 
DELETE  A  RECORD  FROM  DFSETLINKAGE  ENITY 
DELETE  A  RECORD  FROM  DF  SETLINKAGE  ENITY 
DELETE  RECORD  CLASS  FROM  USER_DEF_DATA_TYPE 
DELETE  RECORD  CLASS  FROM  USERDEFDATA-TYPE 
DELETE  THE  RECORD  FROM  ENTITYCLASS 
DELETE  RECORD  CLASS  FROM  ENTITY  NAME 
DELETE  A  RECORD  FROM  EC_KEYWORD 
DELETE  THE  RECORD  FROM  ENTITY_NAME 
DELETE  RECORD  CLASS  FROM  AUCSTMAPPING 
A  REORD  FROM  I NHER I TED_ATT_USE 
A  RECORD  FROM  INHERITEDATTUSE  ENITY 
DELETE  RECORD  CLASS  FROM  PRO JECT_DATA_F I ELD 
DELETE  RECORD  CLASS  FROM  RC_BASED_REC_SET 

A  RECORD  FROM  IMSSEGMENTSIZE  ENITY 
A  RECORD  FROM  IMSSEGMENTSIZE  ENITY 
A  RECORD  FROM  KEYCLASS 
A  RECORD  FROM  KEY_CLASS_MEMBER 
A  RECORD  FROM  KEYCLASSMEMBER 
A  RECORD  FROM  AC_KEYWORD 
A  RECORD  FROM  ACKEYWORD 
A  RECORD  FROM  ECKEYWORD 
A  RECORD  FROM  RC  KEYWORD 


DELETE 

DELETE 


DELETE 

DELETE 

DELETE 

DELETE 

DELETE 

DELETE 

DELETE 

DELETE 

DELETE 
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DELMIGK  -  DELETE  MIGRATING  KEY  CLASS 

DELMOD  -  DELETE  A  RECORD  FROM  MODELCLASS  ENITY 

DELMTKC  -  DELETE  EMPTY  KEY  CLASSES  GIVEN  THE  MODEL  NUMBER 

DELOACE  -  DELETE  A  RECORD  FROM  OWNEDATTRIBUTE  ENITY 

DELOWAC  -  DELETE  A  RECORD  FROM  OVNED_ ATTRIBUTE 

DELPCB  -  DELETE  A  RECORD  FROM  PSBPCB  ENITY 

DELPDFT  -  DELETE  A  RECORD  FROM  PRO JECT_DATA_F I ELD  ENITY 

DELPDI  -  DELETE  RECORD  CLASS  FROM  PRO JECT_DATA_ ITEM 

DELRBR1  -  DELETE  A  RECORD  FROM  RCBASEDRECSET  ENITY 

DELRBR2  -  DELETE  A  RECORD  FROM  RC_BASED_REC_SET  ENITY 

DELRBR3  -  DELETE  A  RECORD  FROM  RC_BASED_REC_SET  ENITY 

DELRC  -  DELETE  A  RECORD  FROM  RELAT I ONCLAS S 

DELRCKW  -  DELETE  A  RECORD  FROM  RC_KEYWORD 

DELRCST  -  DELETE  RECORD  CLASS  FROM  RCBASED  REC  SET 

DELREUS 

DELRKM1  -  DELETE  A  RECORD  FROM  RECORD  KEY  MEMBER  ENITY 

DELRKM2  -  DELETE  A  RECORD  FROM  RECORDKEYMEMBER  ENITY 

DELRKM3  -  DELETE  A  RECORD  FROM  RECORDKEYMEMBER  ENITY 

DELRKY1  -  DELETE  A  RECORD  FROM  RECORDKEY  ENITY 

DELRKY2  -  DELETE  A  RECORD  FROM  RECORDKEY  ENITY 

DELRST2  -  DELETE  A  RECORD  FROM  RECORDSET  ENTITY 

DELRST3  -  DELETE  A  RECORD  FROM  RECORDSET  ENITY 

DELRTY2  -  DELETE  A  RECORD  FROM  REOORDTYPE  ENITY 

DELSDF1  -  DELETE  A  RECORD  FROM  S EGMENT_DATA_F I ELD  ENITY 

DELSDF2  -  DELETE  A  RECORD  FROM  SEGMENT_DATA_F I ELD  ENITY 

DELSDF3  -  DELETE  A  RECORD  FROM  S EGMENTDAT AF I ELD  ENITY 

DELSEC  -  DELETE  RECORD  CLASS  FROM  SEC 

DELSECR  -  DELETE  RECORD  CLASS  FROM  SEC_RC_COMPONENT 

DELSN1  -  DELETE  A  RECORD  FROM  SCHEMA_NAMES  ENITY 

DELSTM1  -  DELETE  A  RECORD  FROM  SET_TYPE_MEMBER  ENITY 

DELSTM2  -  DELETE  A  RECORD  FROM  SET_TYPE_MEMBER  ENTITY 

DELSTM3  -  DELETE  A  RECORD  FROM  SET_TYPE_MEMBER  ENITY 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC_TEXT  ENITY 

DELTXT  -  DELETE  DESCRIPTION  TEXT  GIVEN  THE  OBJECT  TYPE, 

DEPATT  -  SELECT  ALL  THE  ATTRIBUTES  IN  THE 

DEPENT  -  SELECT  ALL  THE  DEPENDANT  ENTITY  CLASSES 

DEPREL  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 

GENERATE 

DLDSL2  -  DELETE  A  RECORD  FROM  DFSETLINKAGE  ENTITY 

DLMIGRC  -  DELETE  MIGRATING  KEY  CLASS 

DPKCLST  -  CREATE  AN  KEY_CLASS_LIST  TABLE  CONTAINING  ALL 

THE  ENTITY 

DRPDF  -  DELETE  A  RECORD  FROM  DATAFIELD  ENITY 

GETNXNO 

INITSES  -  PERFORM  ANY  SESSION  INITIALIZATION  NECESSARY 
INSAC  -  INSERT  A  RECORD  INTO  ATTRIBUTECLASS 

INSACNM  -  INSERT  A  RECORD  INTO  ATTRIBUTE  NAME 
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I NS ARE A 

- 

INSERT 

A 

RECORD 

INTO 

IF 

INSAUC 

- 

INSERT 

A 

RECORD 

INTO 

INSAUCS 

- 

INSERT 

A 

RECORD 

INTO 

INSCRC 

- 

INSERT 

A 

RECORD 

INTO 

INSDAA 

- 

INSERT 

A 

RECORD 

INTO 

ENTITY.  IF 

INSDB 

- 

INSERT 

A 

RECORD 

INTO 

INSDFLD 

- 

INSERT 

A 

RECORD 

INTO 

INSDI 

- 

INSERT 

A 

RECORD 

INTO 

INSDOM 

- 

INSERT 

A 

RECORD 

INTO 

INSDSL 

- 

INSERT 

A 

RECORD 

INTO 

IF 

INSDT 

- 

INSERT 

A 

RECORD 

INTO 

INSEC 

- 

INSERT 

A 

RECORD 

INTO 

INSECNM 

- 

INSERT 

A 

RECORD 

INTO 

INSIAUC 

- 

INSERT 

A 

RECORD 

INTO 

INSISS 

- 

INSERT 

A 

RECORD 

INTO 

ENTITY.  IF 

INSKC 

— 

INSERT 

A 

RECORD 

INTO 

INSKCM 

— 

INSERT 

A 

RECORD 

INTO 

INSKW 

- 

INSERT 

A 

RECORD 

INTO 

INSKWAC 

- 

INSERT 

A 

RECORD 

INTO 

INSKWEC 

- 

INSERT 

A 

RECORD 

INTO 

INSKWRC 

- 

INSERT 

A 

RECORD 

INTO 

INSMOD 

- 

INSERT 

A 

RECORD 

INTO 

INSOAC 

- 

INSERT 

A 

RECORD 

INTO 

INSPCB 

- 

INSERT 

A 

RECORD 

INTO 

I NS PDF 

- 

INSERT 

A 

RECORD 

INTO 

INSPDI 

- 

INSERT 

A 

RECORD 

INTO 

INSPSB 

- 

INSERT 

A 

RECORD 

INTO 

INSPWRD 

- 

INSERT 

A 

RECORD 

INTO 

SUCCESSFUL, 

INSRC 

- 

INSERT 

A 

RECORD 

INTO 

INSRCRS 

— 

INSERT 

A 

RECORD 

INTO 

INSREUS 

— 

INSERT 

A 

RECORD 

INTO 

INSRKEY 

- 

INSERT 

A 

RECORD 

INTO 

INSRKM 

- 

INSERT 

A 

RECORD 

INTO 

ENTITY .  IF 

INSRSET 

- 

INSERT 

A 

RECORD 

INTO 

INSRTYP 

- 

INSERT 

A 

RECORD 

INTO 

INSSCH 

- 

INSERT 

A 

RECORD 

INTO 

IF 

INSSDFL 

- 

INSERT 

A 

RECORD 

INTO 

ENTITY.  IF 

INSSEC 

- 

INSERT 

A 

RECORD 

INTO 

INSSECR 

- 

INSERT 

A 

RECORD 

INTO 

THE  DATA_BASE  AREA  ENTITY. 

ATTR I BUTE_U S E_CL 
AUCSTMAPPING 
COMPLETE_RELATION 
THE  DB_AREA_ASS IGNMENT 

THE  DATABASE  ENTITY.  IF 
THE  DATAFIELD  ENTITY. 
DATAITEM 
DOMAINCLASS 

THE  DFSET  LINKAGE  ENTITY. 

USER  DEF  DATA  TYPE 
ENTITY  CLASS 
ENTIYTNAME 
I NHER I TEDATTUSE 
THE  IMSSEGMENT  SIZE 

KEYCLASS 

KE Y_CL A  S  S_MEMBER 

KEYWORD 

AC_KEYWORD 

EC_KEYWORD 

RC_KEYWORD 

HODEL_CL AS S 

OWNED_ ATTR I BUTE 

THE  PSBPCB  ENTITY.  IF 

PRO JECTDATA  F I ELD 

PRO JECT_DATA_ ITEM 

THE  PSB  ENTITY.  IF 

THE  DBPASSWORD.  IF 

RELATIONCLASS 

RCBASEDRECSET 

REUSABLENUMBER 

THE  RECORDKEY  ENTITY.  IF 

THE  RECORD_KEY  MEMBER 

THE  RECORDSET  ENTITY.  IF 
THE  RECORD_TYPE  ENTITY.  IF 
THE  SCHEMANAMES  ENTITY. 

THE  SEGMENTDATAFIELD 

SEC 

SEC  RC  COMPONENT 
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INSSTM 

MRGM0D2 

MRGNODE 

NRGET 

RDDESC 

ROLBACK 

SELIAUC 

TERMSES 

TLOOPCK 

TOPNODE 

UPDAC 

UPDACAL 

UPDACNM 

UPDECAL 

UPDECNM 

UPDIND 

UPDMNAM 

UPDMOD 

UPDNXNO 

UPDRCNM 

UPDTDOM 

UPDTDT 

UPDTKW 

UPDTRC 

UPDVIEW 

WRTDESC 

WRTDSC4 


INSERT  A  RECORD  INTO  THE  SETTYPEMEMBER 
ENTITY.  IF 

CONTROL  THE  LOGIC  FOR  PROCESSING  THE  REMAINING 
M0DEL2 

SELECT  ALL  THE  TOP  NODE  (LEVEL  1)  INDEPENDENT 
ENTITY'S 

STORE  DESCRIPTION  ON  THE  CDM 
ROLBACK  THE  TRANSACTIONS. 

SELECTS  ALL  THE  INHERITED  TAG  NAMES 
ROUTINE  TO  TERMINATE  AN  NDDL 

CHECK  FOR  LOOPS  FROM  THE  ENTITY  GIVEN  DOWN  THE 
HIERARCHY 

SELECT  ALL  THE  LEVEL  1  TOP  NODE  INDEPENDENT 
ENTITY 

UPDATE  ATTRIBUTECLASS  SET  DOMAIN  NO  =  :  1 
UPDATE  MODELCLASS  SET  ACNAME  TYPE  *  :  1 
UPDATE  ATTRIBUTENAME  SET  AC  NAME  -  :  1 
UPDATE  MODELCLASS  SET  EC  NAME  TYPE  -  :  1 
UPDATE  MODELCLASS  SET  ENTITY  NAME  -  :  1 
UPDATE  USER_DEF_DATA_TYPE  SET  DATATYPE  IND  *  : 
1 

UPDATE  MODEL_CLASS  SET  MODEL  NAME  -  :  1 
UPDATE  MODELCLASS  SET  MODEL_STATUS  -  :  1 

UPDATE  RELATIONCLASS  SET  RC  NAME  -  :  1 
UPDATE  DOMAIN  SET  DOMAINNAME  -  :  1 
UPDATE  USERDEFDATA  TYPE  SET  TYPEID  =  :  1 
UPDATE  KEYWORD  SET  KEYWORD  -  :  1 
UPDATE  RELATION  CLASS  SET  NOIND  ENT  =  :  1 . 
UPDATE  VIEW  SET  SECID  -  :  1 
SELECT  A  RECORD  FROM  DESCTEXT  ENITY 
SELECT  A  RECORD  FROM  DESC  TEXT  ENITY 


USED  IN  MAIN  PROGRAM ( S ) : 


DELDFL1  -  DELETE  A  RECORD  FROM  DATAFIELD  ENITY 
NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


EXCFLAG 

DETERMINE  IF  KEYWORDS .ALIASES .DESCR  ARE 

TO  BE  EXCLUDED 

VAX- 11  COBOL 

SUBROUTINE 

EXCFLAG 

.COB 


PS41100 


DESCRIPTION: 


GETS  THE  ITEMS  TO  BE  EXCLUDED  (IF  ANY)  FROM  THE  PARSER  LIST 
AND  SETS  THE  KEYWORD.  ALIAS  AND  DESC  FLAP  ACCORDINGLY.  A 
FLAG  VALUE  OF  ZERO  INDICATES  KEYWORDS,  ALIASES,  AND/OR 
DESCRIPTIONS  ARE  TO  BE  INCLUDED  IN  GENERATED  NDDL  COMMANDS. 
A  VALUE  OF  1  INDICATE  THEY  ARE  TO  BE  EXCLUDED  FROM  THE 
GENERATED  NDDL. 


EACH  KEYWORD  IS  PLACED  ON  A  SEPERATE 
LIST  BY  THE  PARSER. 


ARGUMENTS 


KEYWRD-FLAG  -  DSPLY  [9] 
ALIAS-FLAG  -  DSPLY  [9] 
DESC-FLAG  -  DSPLY  [9] 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED: 


3-616 
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CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 


CALLED  DIRECTLY  BY: 


CMBENT  -  CONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 

COPATT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING  AN 

ATTRIBUTE. 

COPENT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

ENTITY  COMMAND. 

CPYMOD  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

MODEL  COMMAND. 

MRGMOD  -  MERGE  TWO  IDEF  MODELS  INTO  ONE 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


EXPRCLT 

EXPAND  RELATION  LIST  TO  INCLUDE  DEP  AND 

IND  ENTITIES 

VAX- 11  COBOL 

SUBROUTINE 

EXPRCLT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


I 


THIS  ROUTINE  CONTAINS  THE  PROCESSING  LOGIC  TO 
EXPAND  THE  RELATION  CLASS  LIST. 

For  each  entry  in  the 

relation  class  list,  populate  the  dependent 
or  independent  entity  class  name. 


ARGUMENTS : 


VIEW-RELATION-CLASS-LIST  -  RECRD 
VIEW-FROM-LIST  =  RECRD 


INCLUDE  FILES: 


VWRC  -  LIST  OF  RELATION  CLASSES  INHERENT  TO  A  VIEW 

VWFROM  -  LIST  OF  ENTITIES  SPECIFIED  IN  A  VIEW 


CALLED  DIRECTLY  BY: 


REMVIEW  -  POPULATE  VIEW  DEFINITION  AND  ES-CS-MAPPING 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN 


PS  620141100 
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-  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-619 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


EXPRTLT 

EXPAND  THE  RETRIEVE 

VAX- 11  COBOL 

SUBROUTINE 

EXPRTLT 

-COB 

CDM 

PS41100 


LIST  (SELECT. .FROM. . ) 


ARGUMENTS : 


VIEW-RETRIEVE-LIST  -  RECRD 
VIEW-FROM-LIST  -  RECRD 
RETURN-STATUS  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 

VWRETR  -  LIST  OF  ENTITIES  AND  TAGS  SPECIFIED  IN  A  VIEW 

VWFROM  -  LIST  OF  ENTITIES  SPECIFIED  IN  A  VIEW 

ROUTINES  CALLED: 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

CALLED  DIRECTLY  BY: 

PM FROM  -  CREATE  A  VIEW  FROM  MULTIPLE  ENTITY  CLASSES 

USED  IN  MAIN  PROGRAM ( S ) : 
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NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


FCOPATT 

GENERATE  NDDL  COMMANDS  FROM  A  COPY 

ATTRIBUTE  COMMAND 

VAX-11  COBOL 

SUBROUTINE 

FCOPATT 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  IS  CALLED  BY  COPY  ATTRIBUTE  TO  GENERATE  NDDL 
COMMANDS  ON  A  FILE. 


ARGUMENTS : 


CUR-MODEL-NO  -  DSPLY  [S9(9)3 
FILE-NAME  -  DSPLY  [X(30)3 
MOD-NAME  -  DSPLY  [X(30)3 
AC-NAME1  -  DSPLY  [X(30)3 
AC-NAME2  -  DSPLY  [X(30)3 
DOM-NAME  -  DSPLY  [X(30)3 
AC-N01  -  DSPLY  [S9(9)3 
KEYWORD-FLAG  -  DSPLY  [9] 
ALIAS-FLAG  «  DSPLY  [93 
DESC-FLAG  -  DSPLY  [9] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 
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VERATT 

UERROR 

OPNFIL 

ADDPARM 

GENATT 

GENDESC 

GENALI 

CLSFIL 

ERR PRO 


-  VERIFY  THE  EXISTENCE  OF  AN  ATTRIBUTE  CLASS  IN  A 

MODEL 

-  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

-  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS / DEL I M I TER 

-  GENERATE  A  CREATE  ATTRIBUTE..  COMMAND 

-  GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 

OBJECT  TYPE  AND  NO 

-  GENERATE  A  CREATE  ALIAS  COMMAND  FOR  AN  OBJECT 

TYPE 

-  THIS  ROUTINE  CLOSES  AN  OUTPUT  FILE.  THE  FILE 

WILL 


CALLED  DIRECTLY  BY: 

GOPATT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING  AN 

ATTRIBUTE. 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


FCOPENT 
DETERMINE  IF 
OR  RELATION 
VAX-11  COBOL 
SUBROUTINE 
FCOPENT 
.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


COPY  ENTITY  WITH  STRUCTURE 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 
ENTITY  COMMAND  WHERE  THE  NDDL  STATEMENTS  ARE  GENERATED  ON  A 
FILE. 


ARGUMENTS : 


WITH-TYPE  -  DSPLY  [X(9)] 
FROM-MODEL-NO  -  DSPLY  [S9(9)J 
FROM -MODEL-NAME  -  DSPLY  [X(30)l 
FROM-EC-NO  -  DSPLY  [S9(9)] 
FROM-EC-NAME  -  DSPLY  [X(30>] 
TO-EC-NAME  -  DSPLY  [X(30)] 
KV-FLAG  -  DSPLY  [9] 

ALIAS-FLAG  -  DSPLY  [9] 

DESC-FLAG  -  DSPLY  [9] 

FILE-NAME  -  DSPLY  [X(30)] 
CUR-MODEL-NO  -  DSPLY  lS9(9)] 
CUR-MODEL-NAME  -  DSPLY  [X(30>] 


INCLUDE  FILES: 


ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 
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ROUTINES  CALLED: 


CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 

CERELS  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  IN  A  RELATION. 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ERRPRO 


CALLED  DIRECTLY  BY: 


COPENT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

ENTITY  COMMAND. 


USED  IN  MAIN  PROGRAM(S): 


NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


FILEINS 

INSERT  DESCRIPTION  TEXT  INTO  CDM 

VAX- 11  COBOL 

SUBROUTINE 

FILEINS 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


EXT  INTO  CDM 


DESCRIPTION  :  FILEINS  READS  DESCRIPTION  TEXT  FROM  A  USER- 

SPECIFIED  FILE  AND  INSERTS  THE  TEXT  INTO  THE  CDM. 

PREVIOUS  DESCRIPTION  TEXT,  IF  ANY,  IS  DELETED. 

IF  THE  FILE  DOESN'T  EXIST  OR  IF  IT  IS  EMPTY,  PRE¬ 
EXISTING  TEXT  IS  NOT  DELETED  AND  AN  ERROR  MESSAGE 
IS  GENERATED. 


FILEINS  READS  TEXT  FROM  A  FILE,  BINDS  IN  A  TEXT  LINE 
NUMBER  AND  THE  TEXT  ITSELF  AND  INSERTS  THE  OBJECT  TYPE, 
OBJECT  NUMBER,  DESCRIPTION  TYPE,  TEXT  LINE  NUMBER  AND 
TEXT  INTO  THE  DATABASE. 

F  IT  EXISTS. 

EXT. 


ARGUMENTS : 


LDA  -  RECRD 
TEXTCUR  *  RECRD 
FILE-NAME  -  DSPLY  tX(30)] 
OBJ-TYPE  =  DSPLY  [X(30)l 
DESC-TYPE  =  DSPLY  [X(30)] 
OBJ-NO  -  DSPLY  [ S9(9) ] 
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LINE-COUNT  -  DSPLT  [S9(9)] 


INCLUDE  FILES: 


ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


UERROR 

DELTXT 

OBINDN 

OEXEC 

ERRPRO 


ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
DELETE  DESCRIPTION  TEXT  GIVEN  THE  OBJECT  TYPE, 


CALLED  DIRECTLY  BY: 

RDDESC  -  STORE  DESCRIPTION  ON  THE  CDM 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


FINDDOM 

RETRIEVE  A  DOMAIN 

DOMAIN  NAME 

VAX- 11  COBOL 

SUBROUTINE 

FINDDOM 

.PRC 

CDM 

PS41100 


NUMBER  FOR  A  GIVEN 


Given  an  attribute  class  number,  this  routine  will 
return  its  domain  number. 


ARGUMENTS : 


AC-NO  =  DSPLY  [S9(9)l 
DOM-NO  *  DSPLY  [S9(9)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED:  j 


ERRPRO 


CALLED  DIRECTLY  BY: 
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ALTSMAP  -  ALTER  A  SINGLE  MAP 
MAPADF  -  MAP  ON  AUC  TO  A  DATA  FIELD 


USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


FMTIADC 

FORMATS  A  LINE  FOR  THE  ..SET..  CLAUSE 
VAX- 11  COBOL 
SUBROUTINE 
FMTIAUC 
.COB 

CDM 

PS41100 

DESCRIPTION: 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST : 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


formats  a  line  for  the  SET  clause 


ARGUMENTS : 


IAUC-TAG-NAME  *  DSPLY  [X(30)1 
OWNER-TAG-NAME  -  DSPLY  [X(30>] 


ROUTINES  CALLED: 


ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELI MI TER 


CALLED  DIRECTLY  BY: 


SELIAUC  -  SELECTS  ALL  THE  INHERITED  TAG  NAMES 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/ MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


FND1MEM 

RETRIEVE  RECORD  TYPE  OF  MEMBER  ASSOCIATED 

WITH  A  SET 

VAX- 11  COBOL 

SUBROUTINE 

FND1MEM 

.PRC 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


FND1MEM  VERIFIES  THAT  THE  DATABASE  NAME.  SET-NAME  AND  MEMBER 
RECORD  NAME  IS  VALID.  IN  THE  CASE  THAT  THE  OPTIONAL  MEMBER 
RECORD  NAME  HAS  NOT  BEEN  ENTERED.  THIS  ROUTINE  VERIFIES  THAT 
THIS  SET  HAS  ONLY  1  MEMBER  RECORD  NAME  WHICH  IT  RETURNS. 


AN  NDML  SELECT  STATEMENT  RETRIEVES  ALL  OCCURRENCE  OF  THE 
RT  IDOFMEMBER  WHOSE  DBID  AND  SETID  MATCH  THE  INPUT 
ARGUMENTS.  IF  THE  USER  ENTERED  A  MEMBER  RECORD  NAME.  IT  IS 
VALIDATED.  IF  THE  USER  DID  NOT  ENTER  A  MEMBER  RECORD  NAME. 
A  CHECK  IS  MADE  FOR  A  SINGLE  SET  TYPE  MEMBER.  AND.  IF  SO, 
THE  SINGLE  SET  TYPE  MEMBER  NAME  IS  RETURNED. 


ARGUMENTS : 


DB-.’O  =  DSPLY  [S9(9)  ] 
SET-NAME  -  DSPLY  [X(30)] 
MEMBER-RECORD-NAME  =  RECRD 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 
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UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ERRPRO 

CALLED  DIRECTLY  BY: 

MAPRC  -  MAP  A  RELATION  CLASS  TO  A  SET 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


FNDACM 

DELETE  ALL  ATTRIBUTE  CLASSES  FROM  A  GIVEN 
MODEL 

VAX- 11  COBOL 
SUBROUTINE 
FNDACM 
.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  DELETES  THE  ATTRIBUTE  CLASS  FROM  THE  MODEL. 


DELETE  ATTRIBUTE,  KEYWORDS,  VIEWS,  ETC,  FROM 

MODEL,  GIVEN  THE  AC-NO.  THEN  RETURN  THIS  NUMBER  TO  THE 

REUSABLE  POOL. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  [S9(9)] 
ERROR-STATUS  -  DSPLY  tS9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELAC  -  DELETE  A  RECORD  FROM  ATTRIBUTECLASS 

DELACKW  -  DELETE  A  RECORD  FROM  AC  KEYWORD 

DELTEXT  -  DELETE  A  RECORD  FROM  DESC  TEXT  ENITY 


PS  620141100 
1  November  1985 


DELACNM 

ADDRNUM 

SELACNM 

UERROR 

ERRPRO 


-  DELETE  RECORD  CLASS  FROM  ATTR I BUTEN AME  WHERE 

AC_NO 

-  ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 

LINKED 

-  RETRIEVE  THE  PRIMARY  NAME  FOR  ATTRIBUTE  CLASS 

-  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 


CALLED  DIRECTLY  BY: 

DRPMOD  -  CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A  MODEL. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


This  routine  will  verify  that  a  set  has  or  has  not 
been  mapped  to  an  attribute  use  class  before. 


FNDASA 

VERIFY  WHETHER  A  SET  HAS  BEEN  MAPPED  TO 

AN  AUC 

VAX- 11  COBOL 

SUBROUTINE 

FNDASA 

.PRC 

CDM 

PS41100 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9) 3 
SET- ID  •=  DSPLY  [X(30)3 
FOUND  «=  DSPLY  [S9(9)l 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ERRPRO 
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CALLED  DIRECTLY  BY: 


MAPASET  -  MAP  AN  AUC  TO  A  SET 

MAPRC  -  MAP  A  RELATION  CLASS  TO  A  SET 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  FNDASM 

PURPOSE:  DETERMINES  IF  AN  AUC  TO  SET  TYPE  MAPPING 

EXISTS 

LANGUAGE:  VAX- 11  COBOL 

MODULE  TYPE :  SUBROUTINE 

SOURCE  FILE :  FNDASM 

SOURCE  FILE  TYPE:  .PRC 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


-  THIS  ROUTINE  PERFORMS  AN  NDML  SEARCH  OF  THE 
AUC_ST_MAPPING  TABLE  TO  DETERMINE  WHETHER  A  PARTICULAR 
MAPPING  EXISTS.  IF  SO,  FOUND  -  1;  OTHERWISE  ZERO. 


ARGUMENTS : 


DB-NO  -  DSPLY  [S9(9)l 
SET-NAME  -  DSPLY  [X(30)] 
TAG-NO  -  DSPLY  [S9(9)] 
FOUND  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ERRPRO 


CALLED  DIRECTLY  BY: 


ALTSMAP  -  ALTER  A  SINGLE  MAP 
DRPSMAP  -  DROP  A  SINGLE  MAPPING 
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USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


FNDAUC 

DELETE  ALL  ATTRIBUTE  USE  CLASSES  FOR  A 

GIVEN  ENTITY  CLASS 

VAX- 11  COBOL 

SUBROUTINE 

FNDAUC 

.PRC 

CDM 

PS41100 


DESCRIPTION: 


FNDAUC  WILL  RETRIEVE  ALL  ATTRIBUTE  USED  CLASSES 
FOR  AN  ENTITY  AND  DELETE  EACH  ONE. 


ARGUMENTS : 


EC-NO  -  DSPLY  [ S9(9) ] 
RETURN-STATUS  «  DSPLY  [S9(9)j 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELAUC  -  DELETE  INHERITEDATTUSE ,  KEY_CLASS_MEMBER , 

UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 
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DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentat i on 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


FNDECM 

DELETES  ALL  ENTITIES  AND  ASSOCIATED 

OBJECTS  FOR  A  GIVEN  MOD 

VAX- 11  COBOL 

SUBROUTINE 

FNDECM 

.PRC 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  DELETES  THE  ENTITY  CLASS  FROM  THE  MODEL  TO  BE 
DROPPED,  ALONG  WITH  THE  ATTRIBUTE  USE  CLASSES,  KEY  CLASSES 
AND  RELATION  CLASSES. 


ARGUMENTS : 


MODEL-NO  =  DSPLY  [S9(9)3 
ERROR-STATUS  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELOACE 

DELEC 

DELECKW 

DELTEXT 

DLMDAUC 


-  DELETE  A  RECORD  FROM  OWNED_ATTRIBUTE  ENITY 

-  DELETE  THE  RECORD  FROM  ENTITYCLASS 

-  DELETE  A  RECORD  FROM  ECKEYWORD 

-  DELETE  A  RECORD  FROM  DESCTEXT  ENITY 

-  DELETE  ATTRIBUTE  USE  CLASSES  ASSOCIATED  WITH 
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DELMDKC 

DELMDRC 

DELECNM 

ADDRNUM 

SELECNM 
U ERROR 
ERRPRO 


ENTITY 

DELETE  ALL  KEY  CLASSES  AND  INHERITED  KEYS  FOR 
AN  ENTITY 

DELETE  ALL  RELATION  CLASSES  FOR  AN  ENTITY 
DELETE  THE  RECORD  FROM  ENTITYNAME 
ADD  A  AVAILABLE  NO  OF  A  POOL  NO  BACK  TO  NO 
LINKED 

RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 
ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 


CALLED  DIRECTLY  BY: 


DRPMOD  -  CONTROLS  THE  PROCESSING  LOGIC  TO  DROP  A  MODEL. 


USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


FNDOAC 

DELETES  ALL  OWNED  ATTRIBUTES  FOR  A  GIVEN 

ENTITY  CLASS 

VAX- 11  COBOL 

SUBROUTINE 

FNDOAC 

.PRC 

CDM 

PS41100 


DESCRIPTION: 


FNDOAC  WILL  RETRIEVE  ALL  OWNED  ATTRIBUTES 
FOR  AN  ENTITY  CLASS  AND  DEBATE  THEM  AS  OWNED 
ATTRIBUTES  OF  THE  ENTITY  CLASS. 


ARGUMENTS : 


EC-NO  -  DSPLY  [ S9(9) ] 
RETURN-STATUS  -  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELOAC  -  DELETE  ALL  OWNED  AND  INHERITED  ATTRIBUTES 
UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
ERRPRO 


CALLED  DIRECTLY  BY: 
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DRPENT  -  CONTROL  THE  PROCESSING  LOGIC  FOR  DELETING 

ENTITIES . 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


FNDRCM 

RETRIEVES  ALL  RC/RT 

RECORD 

VAX- 11  COBOL 

SUBROUTINE 

FNDRCM 

.PRC 

CDM 

PS41100 


MAPPINGS  FOR  A  NAMED 


FNDRCM  RETURNS  ALL  ROWS  OF  RC  BASED  REC  SET 
WITH  MATCHING  DB  NUMBERS.  SET  NAMES  AND  RELATION  CLASS 

NUMBERS . 

IF  THE  USER  ENTERED  A  RECORD  NAME  IN  THE  COMMAND.  A  CHECK  IS 
MADE  TO  DETERMINE  IF  IT  IS  VALID.  IF  NO  RECORD  NAME  WAS 
ENTERED,  AND  IF  MORE  THAN  1  ROW  IS  RETURNED.  AN  ERROR 

CONDITION 

EXISTS.  ALSO.  AN  ERROR  CONDITION  EXISTS  IF  NO  ROWS  ARE 

RETURNED . 


ARGUMENTS : 


DB-NO  =  DSPLY  [S9(9)] 
SET-NAME  «•  DSPLY  [X(30)] 
RC-NO  =  DSPLY  t  S9( 9 ) ] 
REC-NAME  -  RECRD 
ERROR-FLAG  -  DSPLY  [S9(9)l 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ERRPRO 
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CALLED  DIRECTLY  BY: 

DRPSMAP  -  DROP  A  SINGLE  MAPPING 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


FRTOREL 

DETERMINE  IF  RELATION  EXISTS  BETWEEN 

INTRA-MOD  ENTITIES 

VAX- 11  COBOL 

SUBROUTINE 

FRTOREL 

-COB 

CDM 

PS41100 


DESCRIPTION: 


THIS  ROUTINE  LOOKS  FOR  RELATIONS  BETWEEN  THE  FROM -ENTITY 
AND  TO-ENTITY  ON  AN  INTRA  MODEL  COMBINE.  IF  FOUND.  GENERATE 
A  “DROP  RELATION”. 


ARGUMENTS : 


FROM-EC-NO  -  DSPLY  [S9(9)] 
FROM-EC-NAME  -  DSPLY  [X(30)3 
TO-EC-NO  -  DSPLY  [S9(9)] 
TO-EC-NAME  -  DSPLY  [X(30)J 
RCNO-LIST  -  RECRD 


INCLUDE  FILES: 


LISTREL  -  LIST  OF  RELATIONS 

RELTBL  -  LIST  OF  RELATION  CLASSES  IN  A  MODEL 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


SELRCNM  -  RETRIEVE  ALL  RELATION  CLASSES  FOR  WHICH  AN 

ENTITY  IS  PART  OF 
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UWARN 

ADDPARM 

ERRPRO 


ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS /DELIMITER 


CALLED  DIRECTLY  BY: 

CMBENT  -  CONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GENAKW 

RETRIEVE  ALL  KEYWORDS  FOR  AN  ATTRIBUTE 
CLASS 

VAX- 11  COBOL 
SUBROUTINE 
GENAKW 
.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SELECTS  ALL  THE  KEYWORDS  FOR  A  GIVEN  ATTRIBUTE  AND  GENERATES 
THE  KEYWORD  PHRASE  FOR  THE  CREATE  ATTRIBUTE  COMMAND. 


ARGUMENTS : 


AC-NO  =  DSPLY  t S9(9) ] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ADDPARM 


ERRPRO 


-  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS / DEL I M I TER 


CALLED  DIRECTLY  BY: 


GEN ATT  -  GENERATE  A  CREATE  ATTRIBUTE..  COMMAND 


3-649 
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USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


! 


I 

I 

I 


PS  620141100 
1  November  1965 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GENALI 

GENERATE  A  CREATE  ALIAS  COMMAND  FOR  AN 

OBJECT  TYPE 

VAX- 11  COBOL 

SUBROUTINE 

GENALI 

•  COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


GENERATES  A  CREATE  ALIAS  GIVEN  THE  OBJECT  TYPE  ( "ENTITY"  OR 
■ATTRIBUTE")  AND  THE  OBJECT'S  PRIMARY  NAME  AND  ALIAS  NAME. 


ARGUMENTS : 


OBJ-TYPE  -  DSPLY  [X(30)] 
OBJ-NAME  =  DSPLY  [X(30>] 
ALIAS-NAME  -  DSPLY  [X(30)3 


ROUTINES  CALLED: 


ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELI MI TER 


CALLED  DIRECTLY  BY: 


CMBACAL 

CMBALI 

FCOPATT 

ALLATT 


GENERATE  CREATE  ALIAS  ATTRIBUTE..  AND  ALIAS 
DESC  TEXT  COMMANDS 

GENERATE  CREATE  ALIAS  ENTITY .. COMMAND 
GENERATE  NDDL  COMMANDS  FROM  A  COPY  ATTRIBUTE 
COMMAND 

SELECT  ALL  THE  ATTRIBUTES  IN  FROM -MODEL  AND 


3-651 
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GENERATE 

ALLENT  -  SELECT  ALL  THE  ATTRIBUTES  IN  F ROM-MODEL  AMD 

GENERATE 

DEPATT  -  SELECT  ALL  THE  ATTRIBUTES  IN  THE 

DEPEMT  -  SELECT  ALL  THE  DEPENDANT  ENTITY  CLASSES 


USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


i 


i 

i 


3-652 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GEN ALT 1 

GENERATE  AN  ALTER  ENTITY.. ADD  KEY  CLASS 

COMMAND 

VAX- 11  COBOL 

SUBROUTINE 

GEN ALT 1 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


Generates  an  ALTER  ENTITY  command  to  add  a  key 
class  to  an  entity,  given  the  entity's  ec-no  said  ec-name. 


ARGUMENTS : 


EC-NO  -  DSPLY  t S9(9) ] 
EC-NAME  -  DSPLY  [X(30)] 
KC-LIST  -  RECRD 


INCLUDE  FILES: 


KEYLIST  -  DATA  STRUCTURE  FOR  NDDL  MODELLING  COMMANDS 


ROUTINES  CALLED: 


NEXTKC  -  THIS  ROUTINE  RETURNS  A  KC_NAME  FOR  A  GIVEN 

EC_N0  FROM 

ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECK S/DELIMI TER 

NEXTKCM  -  THIS  ROUTINE  RETURNS  A  KG_N0 , KGNAME  FOR  A 

GIVEN  EC  NO 


CALLED  DIRECTLY  BY: 


PS  620141100 
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ALLKEY  -  GENERATES  KEY  CLASS  FOR  AN  ENTITY 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE: 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST : 


GENALTE 

GENERATE  AN  ALTER  ENTITY.. ADD  KEY  CLASS 

COMMAND 

VAX- 11  COBOL 

SUBROUTINE 

GENALTE 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


Generates  an  ALTER  ENTITY  command  to  add  a  key 
class  to  an  entity,  given  the  entity's  ec-no  and  ec-name. 


ARGUMENTS : 


EC-NO  -  DSPLY  [S9(9) ] 
EC-NAME  -  DSPLY  [X(30)] 


ROUTINES  CALLED: 


NEXTKC  -  THIS  ROUTINE  RETURNS  A  KCNAME  FOR  A  GIVEN 

EC_N0  FROM 

ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELIMITER 

NEXTKCM  -  THIS  ROUTINE  RETURNS  A  KGNO , KG_NAME  FOR  A 

GIVEN  EC  NO 


I  .*  CALLED  DIRECTLY  BY: 

l 

i  CERELS  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

|  ENTITIES  IN  A  RELATION. 

CESTRUC  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 

CMBENT  -  CONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 


3-655 
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ENTITY  COMMAND. 

MRGMODE  -  SELECT  ALL  THE  TOP  NODE  (LEVEL  1)  INDEPENDENT 

ENTITY'S 

TOPMODE  -  SELECT  ALL  THE  LEVEL  1  TOP  NODE  INDEPENDENT 

ENTITY 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  GENATT 

PURPOSE:  GENERATE  A  CREATE  ATTRIBUTE..  COMMAND 

LANGUAGE :  VAX- 1 1  COBOL 

MODULE  TYPE:  SUBROUTINE 

SOURCE  FILE :  GENATT 

SOURCE  FILE  TYPE:  .COB 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


GENERATES  A  CREATE  ATTRIBUTE  COMMAND. 


ARGUMENTS : 


AC-NO  *  DSPLY  [ S9(9) ] 
AC-NAME  ■  DSPLY  [X(30)l 
DOM-NAME  -  DSPLY  [X(30)] 
KEYWRD-FLAG  *  DSPLY  [93 


ROUTINES  CALLED: 


ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS/DELIMITER 

GENAKW  -  RETRIEVE  ALL  KEYWORDS  FOR  AN  ATTRIBUTE  CLASS 


CALLED  DIRECTLY  BY: 


CMBOA  -  GENERATE  COMMANDS  FOR  ATTRIBUTES.  ITS 

KEYWORDS . ALIAS , DESC 

FCOPATT  -  GENERATE  NDDL  COMMANDS  FROM  A  COPY  ATTRIBUTE 

COMMAND 

ALL ATT  -  SELECT  ALL  THE  ATTRIBUTES  IN  FROM -MODEL  AND 

GENERATE 
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DEPATT  -  SELECT  ALL  THE  ATTRIBUTES  IN  THE 
USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  Novenber  1985 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GENDESC 

GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A 

GIVEN  OBJECT  TYPE  AN 

VAX- 11  COBOL 

SUBROUTINE 

GENDESC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


GENERATES  A  DESCRIBE  COMMAND  WITH  EMBEDDED  TEXT  DESCRIPTION 
FOR  EACH  DESC-TYPE  IN  THE  COM  FOR  A  GIVEN  OBJECT-TYPE  AND 
OBJECT-NO.  OBJECT-TYPES  USED  BY  THIS  ROUTINE  ARE  ENTITY' , 
ATTRIBUTE'  AND  RELATION*. 


ARGUMENTS : 


OBJ-TYPE  -  DSPLY  [X(30)l 
OBJ-NO  -  DSPLY  [S9(9)J 
0BJ-NAME1  -  DSPLY  [X(30)] 
0BJ-NAME2  -  DSPLY  [X(30)l 
0BJ-NAME3  -  DSPLY  [X(30)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


-  THIS  ROUTINE  WRITES  80  CHARACTERS  OF 
DESCRIPTIVE  TEXT 


ADDTXT 


PS  630141100 
1  lovtabtr  1065 


ADDPARM 

ERRPRO 


•RITES  SO  CHAR  NDOL  COMMAND  WITH  PARAMENTERS 
CHECES/DELIMITER 


DCPATT 

dcpent 

DC FUEL 

KRGMOD2 


GENERATE  COMMANDS  POft  ATTRIBUTES.  ITS 
KEYWORDS .  ALI A8  .  DOC 

GENERATE  CREATE  RELATION .  DESCRIBE  COMMANDS  II 
THE  TO-NODEL 

GENERATE  MDOL  COMMANDS  FROM  A  COPT  ATTRIBUTE 
COMMAND 

GENERATE  CREATE/ ALTER  ENTITY  COMMAND. ALIAS .  AND 
DKSCRS. 

RETRIEVES  RELATIONS .DBTERM I NE8  I HD  BC  AND 
GENERATES  NDOL 

SELECT  ALL  THE  ATTRIBUTES  IB  FROM- MODEL  AND 
GENERATE 

SELECT  ALL  THE  ATTRIBUTES  IB  PROM-MODEL  AND 
GENERATE 

POM  EACH  LEVEL  OF  RELATIONS  IB  PROM-MODEL 
GENERATE 

SELECT  ALL  THE  ATTRIBUTES  IN  THE 

SELECT  ALL  THE  DEPENDANT  ENTITY  CLASSES 

FOR  EACH  LEVEL  OP  RELATIONS  IN  STRUCTURE 
GENERATE 

CONTROL  THE  LOGIC  FOR  PROCESSING  THE  REMAINING 
MODEL  2 


USED  IN  MAIN  PROGRAM ( S ) : 

NDOL /HA IN  -  MAIN  PROGRAM  FOR  THE  BOOL  COMMAND  PROCESSOR 
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WDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
SOURCE  PILE: 
SOURCE  PILE  TYPE: 


GENEKV 

SELECT  KEYWORD 

KEYWORD  PHRASE 

VAX- 11  COBOL 

SUBROUTINE 

GENEKV 

.PRC 

CDM 


HOST: 

SUBSYSTEM : 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


FOR  ENTITY  AND  CREATE 
FOR  CRT 


DESCRIPTION: 


SELECTS  ALL  THE  KEYWORDS  FOR  A  GIVEN  ENTITY  AND  GENERATES 
THE  KEYWORD  PHRASE  FOR  THE  CREATE  ENTITY  COMMAND. 


ARGUMENTS : 


EC- WO  -  DSPLY  [ S9( 9 ) ] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 


WRITES  SO  CHAR  NDDL  COMMAND  WITH  P ARAM ENTERS 
CHECKS / DEL I M I TER 


CALLED  DIRECTLY  BY 


GENEWT  -  GENERATE  A  CREATE  ENTITY  OWNED 


3-662 
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ATTRIBUTE. . KEYWORD  COMMAND 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIH  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-663 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GENENT 

GENERATE  A  CREATE  ENTITY. .OWNED 

ATTRIBUTE. .KEYWORD  COMMAND 

VAX- 11  COBOL 

SUBROUTINE 

GENENT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


GENERATES  A  CREATE  ENTITY  COMMAND  GIVEN  THE  ENTITY  CLASS 
NO.  AND  NAME. 


ARGUMENTS : 


EC-NO  -  DSPLY  [ S9(9) ] 
EC-NAME  -  DSPLY  [X(30)l 
KE YWRD- FLAG  -  DSPLY  [9] 


ROUTINES  CALLED: 


ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELIMITER 

GENOA  -  SELECT  OWNED  ATT  FOR  ENTITY  AND  CREATES  OWNED 

ATT  FOR  CRT  ENT 

GENEKW  -  SELECT  KEYWORD  FOR  ENTITY  AND  CREATE  KEYWORD 

PHRASE  FOR  CRT  ENT 


CALLED  DIRECTLY  BY: 


ALLENT  -  SELECT  ALL  THE  ATTRIBUTES  IN  FROM-MODEL  AND 

GENERATE 


3-664 


PS  620141100 
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DEPEMT  -  SELECT  ALL  THE  DEPENDANT  ENTITY  CLASSES 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


■DDL  COMMAND  PROCESSOR  Module  Documentation 


MAKE :  GENENT1 

PURPOSE:  GENERATE  CREATE/ ALTER  ENTITY 

COMMAND, ALIAS.  AND  DESCRS. 
LANGUAGE:  VAX-11  COBOL 

MODULE  TYPE :  SUBROUTINE 

SOURCE  FILE:  GEN ENT 1 

SOURCE  FILE  TYPE:  .COB 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


THIS  ROUTINE  GENERATES  A  CREATE  ATTRIBUTE  COMMAND  FOR  ALL 
OWNED  ATTRIBUTES  OF  THE  FROM -ENTITY  ALONG  WITH  ITS  KEYWORDS 
ALIASES  AND  DESCRIPTIONS  FOR  THE  TO- ENTITY .  IF  THE  ATTRIBUTE 
DOES  NOT  EXIST  IN  THE  TO-MODEL. 


ARGUMENTS : 


FROM-MOD-NO  -  DSPLY  [S9(9)] 
TO-MOD-NO  -  DSPLY  [S9(9)l 
FROM -EC -NO  -  DSPLY  [S9(9) ] 

TO -EC -NO  -  DSPLY  [9(9)1 
TO-EC-NAME  -  DSPLY  [X(30)l 
KW-FLAG  -  DSPLY  [9] 
ALIAS-FLAG  -  DSPLY  [9] 
DESC-FLAG  -  DSPLY  [9] 
COMBINE-TYPE  -  DSPLY  [9] 
CREATE- FLAG  -  DSPLY  [9] 
RETURN-STATUS  -  DSPLY  [89(9)1 


INCLUDE  FILES: 


-  PROCESS  ERROR  INCLUDE  FILE 


3-666 


ERRPRO 
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m 


4 


•  i.1 

>•,  r 


ROUTINES  CALLED: 


ADPARM1 

CM  BOA 

CMBEKW 
CM BALI 
GENDESC 

ERRPRO 


CREATES  80  CAHR  NDDL  COMMANDS  WITH  PARAMETERS 
AMD  DELIMITERS 

GENERATE  COMMANDS  FOR  ATTRIBUTES.  ITS 
KEYWORDS . ALIAS . DESC 

GENERATE  ADD  KEYWORD  CLAUSE  FOR  ENTITY  KEYWORDS 
GENERATE  CREATE  ALIAS  ENTITY .. COMMAND 
GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 
OBJECT  TYPE  AND  NO 


CALLED  DIRECTLY  BY: 


CERELS 


CESTRUC 


cmbewt 


MRGMOD2 


MRGNODE 


-  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  IN  A  RELATION. 

-  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  FOR  THE  STRUCT 

-  OOMROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 

-  CONTROL  THE  LOGIC  FOR  PROCESSING  THE  REMAINING 

N0DEL2 

-  SELECT  ALL  THE  TOP  NODE  (LEVEL  1)  INDEPENDENT 

ENTITY ' S 


USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/ MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-667 


*  V 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GENOA 

SELECT  OWNED  ATT  FOR  ENTITY  AND  CREATES 

OWNED  ATT  FOR  CRT  E 

VAX- 11  COBOL 

SUBROUTINE 

GENOA 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


SELECTS  ALL  THE  OWNED  ATTRIBUTES  FOR  A  GIVEN  ENTITY  AND 
GENERATES  THE  OWNED  ATTRIBUTE  CLAUSE  FOR  A  CREATE  ENTITY 
COMMAND. 


ARGUMENTS : 


EC-NO  -  DSPLY  [S9(9) ] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ADDPARM 


ERRPRO 


-  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS /DELIMITER 


CALLED  DIRECTLY  BY: 
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GENENT  -  GENERATE  A  CREATE  ENTITY. .OWNED 

ATTRIBUTE. .KEYWORD  COMMAND 


USED  IN  MAIN  PROGRAM(S): 


NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


GENREL 

GENERATE  CREATE  RELATION 

. .MIGRATES. .KEYWORD  COMMAND 

VAX- 11  COBOL 

SUBROUTINE 

GENREL 

.COB 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


GENERATES  A  CREATE  RELATION  COMMAND  GIVEN  THE  RELATION  CLASS 
JOIN.  IF  THE  RELATION  IN  THE  FROM-MODEL  IS  COMPLETE, 
GENERATES  THE  MIGRATES  CLAUSE.  IF  KEYWORDS  WERE  NOT  EXCLUDED 
BY  THE  USER.  GENERATES  A  KEYWORD  CLAUSE. 


ARGUMENTS : 


MODEL-NO  «  DSPLY  [S9(9)] 
IND-EC-NO  -  DSPLY  [S9(9)3 
IND-EC-NAME  -  DSPLY  [X(30)] 
DEP-EC-NO  -  DSPLY  [S9(9)3 
DEP-EC-NAME  -  DSPLY  [X(30)3 
RC-NO  -  DSPLY  [S9(9)3 
RC-NAME  -  DSPLY  [X(30>] 
IND-ENT  -  DSPLY  [S9(9)J 
MIN-DEP-ENT  -  DSPLY  [S9(9)3 
MAX-DEP-ENT  -  DSPLY  [S9(9)3 
KEYWRD-FLAG  «  DSPLY  [93 


ROUTINES  CALLED. 


GENRNME  -  FORMAT  THE  CREATE  RELATION  CLAUSE 

MIGREL  -  GENERATE  A  MIGRATES  CLAUSE  FOR  A  CREATE 
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RELATION  COMMAND 

ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS / DEL I M I TER 

GENRKW  -  SELECT  KEYWORDS  FOR  RELATION  CREATES  KW  PHRASE 

FOR  CREATE  RC 


CALLED  DIRECTLY  BY: 


ALLREL  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL 

GENERATE 

DEPREL  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 

GENERATE 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/ MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 
PURPOSE : 


LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


GENRE* 

SELECT  KEYWORDS  FOR  RELATION  CREATES  KW 

PHRASE  FOR  CREATE  R 

VAX- 11  COBOL 

SUBROUTINE 

GENRKV 

.PRC 

CDM 

PS41100 


DESCRIPTION: 


SELECTS  ALL  THE  KEYWORDS  FOR  A  GIVEN  RELATION  AND  GENERATES 
THE  KEYWORD  PHRASE  FOR  THE  CREATE  RELATION  COMMAND 


ARGUMENTS 


RC-NO  -  DSPLY  [ S9C  9 ) ] 


INCLUDE  FILES 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE  FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED 


ADDPARM 

ERRPRO 


WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS  DELIMITER 


CALLED  DIRECTLY  BY 

GENREL  GENERATE  CREATE  RELATION  MIGRATES  KFYWoRI 
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COMMAND 

USED  IN  MAIN  PROGRAH(S): 


NDDLMAI* 


HAIM  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  GENRNME 

PURPOSE:  FORMAT  THE  CREATE  RELATION  CLAUSE 

LANGUAGE:  VAX- 11  COBOL 

MODULE  TYPE :  SUBROUTINE 

SOURCE  FILE :  GENRNME 

SOURCE  FILE  TYPE:  .COB 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


Formats  the  CREATE  RELATION  clause. 


ARGUMENTS : 


IND-ENT  -  DSPLY  [S9(9)] 
IND-EC-NAME  -  DSPLY  [X(30)] 
RC-NAME  =  DSPLY  [X(30)] 
MIN-DEP-ENT  -  DSPLY  [S9(9)] 
MAX-DEP-ENT  -  DSPLY  [S9(9)3 
DEP-EC-NAME  -  DSPLY  [X(30)l 


ROUTINES  CALLED: 


ADDPARM  -  WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 

CHECKS /DELIMITER 


CALLED  DIRECTLY  BY: 


DEPFROM  -  GENERATE  CREATE  RELATION , DESCRIBE  COMMANDS  IN 

THE  TO -MODEL 

GENREL  -  GENERATE  CREATE  RELATION  .. MIGRATES .. KEYWORD 

COMMAND 

INDFROM  -  RETRIEVES  RELATIONS . DETERMINES  IND  EC  AND 

GENERATES  NDDL 

MRGMOD2  -  CONTROL  THE  LOGIC  FOR  PROCESSING  THE  REMAINING 


3-674 


PI  620141100 

1  lovNbtr  1066 


USED  IS  MAIN  PMOGMAJK  8 ) 

MDOL/MAIM  -  MAIM  MtOGMAM  fOM  THE  MOOL  OOMMAMO  PMOCEMSOM 


3-675 


PS  020141100 
1  lovHbtr  1005 


mot  COMMAND  PROCESSOR  Module  DocumbUUob 


MAMS 
PUS POSE 


LANGUAGE 
NODULE  TYPE 
BOUNCE  TILE 
■OUNCE  PILE  TYPE 

NOSY 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENT AT 1 ON  GROUP 


OETACAL 

VEBirr  THE  EE 1 STANCE  OP  AS  ALIAS  POB  AN 
ATTN I BUTE 
VA1  11  COBOL 
SUBNOUTXNE 
OETACAL 
PNC 


COM 

PSA  1  1 OO 


DESCS1  PTIOM 

VESIPY  THE  EX  1  STANCE  OP  AN  ALIAS  SAME  PON  AN 
ATTN I BUTE  CLASS 

SELECT  THE  ATTNINUTE  QUALIPYING 
ON  THE  UNIQUE  ATTNINUTE  SUMSEN 
ALIAS  NAME  TO  BE 

VERIPIED  AND  NAME  TYPE  BEING  ‘ALIAS " 


ARGUMENTS 

AL  MO  •  DSPLY  | S9< W > J 
ALIAS  ID  •  DSPLY  ( X<  50  )  3 


I MCLUDE  PILES 

SNVNET  AS  THE  NETUNN  GIVEN  A  TABLE  PULL  ENKON 

ESP  PNC  PROCESS  ERROR  INCLUDE  PILE 


ROUTINES  CALLED 

DELACAL  DELETE  RECORD  CLASS  PROM  ATTRIBUTE  NAME 

UERNOR  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

ERR  PRO 


CALLED  DIRECTLY  BY 


3-676 


PS  620141100 
1  November  1985 


DR PAL I  -  DROP  THE  ALIAS  FOR  AM  ENTITY  OR  ATTRIBUTE. 

USED  IN  MAIN  PROGRAM(S): 

MDDL/HAIM  -  MAIM  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1085 


NDDL  COMMAND  PROCESSOR  Module  Docueentat ion 

l 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  PILE: 
SOURCE  FILE  TYPE: 


GETDBST 

RETURN  INFORMATION  ABOUT  THE  CURRENT 

SESSIONS'  DATABASE 

VAX- 11  COBOL 

SUBROUTINE 

GETDBST 

.COB 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  RETURNS  WITH  INFORMATION  ABOUT  THE  DATA  BASE. 
WHICH  IS  OBTAINED  EITHER  FROM  THE  PARSER  LISTS  OR  FROM 
INFORMATION  WHICH  IS  GLOBALLY  AVAILABLE. 


EXTRACT  THE  DATA  BASE  NAME  AND  HOST  NAME  FROM  THE  PARSER 
LIST.  THEM.  AFTER  VERIFYING  THAT  THE  DB  DOES  EXIST.  FETCH 
THE  DBMS  NAME.  IF  NOTHING  WAS  RETRIEVED  FROM  THE  PARSER 
LIST.  THE  CURRENT  DATA  BASE  IS  ASSUMED.  NEXT.  EXTRACT  THE 
SET  ID  OR  MEMBER/OWMER  ID  DEPENDING  ON  WHETHER  IT  IS  A  SET 
OR  PATH. 

ARGUMENTS : 


DB-ID  -  DSPLY  [ S9( 9 ) ] 

SET- ID  -  DSPLY  IX(30)] 
DB-NAME  -  DSPLY  [X(30)J 
HOST-NAME  -  DSPLY  IX(30)] 
DBMS-NAME  -  DSPLY  [X(30)] 
RETURN-STATUS  -  DSPLY  tS9(9)l 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


3-678 
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ROUTINES  CALLED: 


CP PONE  -  EXTRACT  THE  FIRST  TOKEN  PROM  THE  NAMED  LIST 

VERDBA8  -  VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  1108*1 

UERAOR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

CHGLOBL  -  CHANGES  THE  GLOBAL  DB  PARAMETERS 

GETGLOB  -  WILL  PROVIDE  GLOBAL  VARIABLES 

CPFNXT  -  ACCESS  THE  NEXT  TOKEN  IN  A  PARSER  LIST 

ERRPRO 


CALLED  DIRECTLY  BY 


DEFSET  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DEFINE 

SET  COMMAND 


USED  IN  MAIN  PROGRAM! S) 


NDDL/HAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  030141100 
1  lovHlwr  IMS 


NDOL  COMMAND  PROCESSOR  Modulo  DoouMDtatlon 


HANK 

PURPOSE 

LANGUAGE 
MODULI  TYPE 
SOURCE  PILE 
SOURCE  PILE  TYPE 
MOST 

SURSYSTEM 
SURDI RECTORY 
DOCUMENT AT I ON  GROUP 

DESCRIPTION 


This  rout  in*  will  ratrlav#  tha  doasis  ausbsr  for  a 
tag  nut  aiiigncd  to  an  attribute  uis  class 


arrooH 

RETRIEVES  DOMAIN  NUMSER  BASED  ON  TAG  NAME 
POP  ADC 
VAX- 11  OONOL 
SURROUTINE 
QETDOM 
PRC 

COM 

PS4 1 lOO 


ARGUMENTS 


ECHO  -  DSPLY  (89(9)] 

TAG  NAME  -  DSPLY  (X(30)] 
DON  NO  -  DSPLY  (89(9)] 
TAG-NO  -  DSPLY  (89(9)] 


INCLUDE  FILES 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE -FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED 


ERRPRO 


PS  620141100 
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CALLED  DIRECTLY  BY: 


CHED0N8  -  VERIFY  THAT  THE  DATA  ITEM  AMD  ATTRIBUTE  USE 

CLASS . 

SHVIEV  -  CREATE  ES-CS- MAPPING  FOR  USER  SPECIFED  RETRIEVE 

LIST 


USED  IM  NAIM  PROGRAM(S) 


RDDLMAIR  MAIM  PROGRAM  FOR  THE  MDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1065 


NODL  COMMAND  PROCESSOR  Module  Docuaentetion 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE. 

SOURCE  PILE; 

SOURCE  PILE  TYPE: 
HOST: 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENTATION  GROUP 


GETDRT 

PETCH  DATA  BASE. 

PARSER  LISTS 

VAX- 11  COBOL 

SUBROUTINE 

GETDRT 

.COB 


CDM 


PS41 100 


RECORD  TYPE  INFO  PROM 


DESCRIPTION 


ARGUMENTS 


DB-ID  -  DSPLY  [ S9( 9 ) ] 

DBMS -NAME  •  DSPLY  [X(30)] 
RT-1D  -  DSPLY  [ X ( 30 ) ] 
RT-NO  -  DSPLY  (S9(9)] 

RET- STATUS  -  DSPLY  (S9(9)} 


INCLUDE  FILES 


LISTNOS  -  VALID  LIST  NUMBERS 


ROUTINES  CALLED: 


CPFONE 
U ERROR 
VERDBAS 
VERRT 


EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  HOST 
VERIFIES  THE  EX I STANCE  OF  A  RECORD  TYPE. 


CALLED  DIRECTLY  BY: 


3-682 
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DRPREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DROP 

RECORD  COMMAND. 

USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIM  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-683 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME:  GETECAL 

PURPOSE:  VERIFIES  THE  EX I STANCE  OF  AN  ALIAS  FOR  AM 

ENTITY 

LANGUAGE :  VAX - 1 1  COBOL 

MODULE  TYPE :  SUBROUTINE 

SOURCE  FILE :  GETECAL 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION : 


VERIFY  THE  EXISTANCE  OF  ALIAS  NAME  FOR  AN  ENTITY 

SELECT  THE  ENTITY  CLASS  NAME.  QUALIFYING 

ON  THE  ENTITY  NUMBER  AND  ALIAS  NAME  AS 

NAME  TYPE  "ALIAS" . 


ARGUMENTS : 


EC-NO  -  DSPLY  [ S9(9 ) ] 
ALIAS-ID  -  DSPLY  [X(30)l 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


DELECAL  -  DELETE  RECORD  CLASS  FROM  ENTITY  NAME 
UERROR  -  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
ERRPRO 


CALLED  DIRECTLY  BY: 


DRPALI  -  DROP  THE  ALIAS  FOR  AN  ENTITY  OR  ATTRIBUTE. 


PS  620141 lOO 
1  November  1965 


USED  III  HAIR  PROGRAM (  S  )  : 

■DDL /HAIM  -  MAIM  PROGRAM  POM  THE  MDOL  OOMHAMD  PROCESSOR 


3-685 


PS  620141  100 
1  lovnlwr  1965 


•DDL  COMMAND  PROCESSOR  Nodule  DocuMnUt  l on 


HANK 

PURPOSE 

LANGUAGE 
NODULE  TYPE 
FUNCTION  TYPE 
SOURCE  FILE 
SOURCE  FILE  TYPE 
HOST 

SUBSYSTEM 
SUBDIRECTORY 
DOCUMENT AT I OR  GROUP 


GETECNH 

THIS  ROUTINE  SEARCHES  THE  UNBOUNDED 
EC  LIST  DATA 

C 

FUNCTION 
INT  i  ) 

GETECNH 

C 

CDM 

PS41 lOO 


DESCRIPTION 

STRUCTURE  FOR  A  MATCHING  ROW  GIVEN  EC  NO 

AND  RETURNS 
EC  NAME 

SYNOPSIS 

C  GETECNH ( NEC  NO.  NEC  NAME .  NSTATUS ) 

COBOL  CALL  " GETECNH "  USING 

EC-NO. 

EC -NAME . 

STATUS 

FORTRAN  --  CALL  GETECNM( ECHO .  ECNAME .  STATUS) 


INPUT 

IHT  'EC  »0  ; 
CHAR  •  EC  NAME  ; 
INT  • STATUS  ; 

OUTPUT : 


DESCRPIPTION. 
ARGUMENTS : 


EC  NO  -  INT  * 
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EC  NAME  -  CHAR  • 

STATUS  -  I NT  ‘ 


INCLUDE  FILES: 


KEYLIST  -  DATA  STRUCTURE  FOR  NDDL  MODELLING  COMMANDS 


ROUTINES  CALLED: 


STRNCPY 


CALLED  DIRECTLY  BY: 


ALLREL  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL 

GENERATE 

TOPNODE  -  SELECT  ALL  THE  LEVEL  1  TOP  NODE  INDEPENDENT 

ENTITY 

USED  IN  MAIN  PROGRAM(S): 


NDDL /MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


A0-A181  674  INTEGRATED  INFORMATION  SUPPORT  SVSTEM  ( I ISS)  VOLUME  S 
COMMON  DATA  MODEL  S  CU)  GENERAL  ELECTRIC  CO 
SCHENECTADV  NV  PRODUCTION  RESOURCES  CONSU 
UNCLASSIFIED  S  SINGH  ET  AL  81  NOV  85  PS-628141188  F/G  9/2 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP 


GETECS 

USING  ENTITY  CLASS 
RULES 

VAX- 11  COBOL 
SUBROUTINE 
GETECS 
-PRC 

CDM 

PS41100 


VERIFIES  CHECK  MODEL 


DESCRIPTION: 


THIS  ROUTINE  USES  THE  ENTITY  CLASSES  TO  HELP  VERIFYING 
CERTAIN  RULES  BEFORE  A  MODEL  CAN  BE  MARKED  AS  “CHECKED" . 


ARGUMENTS : 


ORACLE -LDA  -  RECRD 
MODEL-NO  -  DSPLY  [S9(9)] 
NDDL- STATUS  -  DSPLY  [S9(9)j 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ORCLEDA  -  WS  DEFINITION  FOR  THE  ORACLE  LOGIN  AREA 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


CHKREL  -  CHECK  IF  RELATIONS  HAVE  BEEN  CREATED  ACCORDING 

TO  STANDARDS 

CHKKEYS  -  CHECKS  TO  SEE  IF  A  KEY  CLASS  FULFILLED  RULES. 
CHKATT  -  CHECK  IF  ATTRIBUTES  HAVE  BEEN  CREATED  ACCORDING 

TO  STANDARDS 


3-688 
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UVARN  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 

ERRPRO 


CALLED  DIRECTLY  BY: 


CHKMOD  -  DETERMINES  WHETHER  CERTAIN  RULES  ARE  FULFILLED. 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

C  —  GETGLOB ( DB_ID ,  DB_NAME,  HOST_NAME ,  DBMS  NAME, 

STATUS) 

COBOL  —  CALL  "GETGLOB"  USING 


DB_ID, 


GETGLOB 

WILL  PROVIDE  GLOBAL  VARIABLES 

C  f 

FUNCTION 
I  NT  () 

GETGLOB 

.C 

CDM 

PS41100 


DB  NAME, 


HOSTNAME , 


DBMS  NAME. 


STATUS . 


FORTRAN  --  CALL 

GETGLOB ( DBID , DBNAME , HOSTNAME , DBMS_NAME , STATUS ) 


INPUT: 


PS  620141100 
1  November  1985 


OUTPUT : 

DB_ID , 

DB  MAKE . 

HOST SAME 
DBMSNAME, 
STATUS . 

DESCRIPTION 


THIS  ROUTINE  WILL  GET  THE  FOLLOWING  4  GLOBAL  VARIABLE 

1.  CURDBID  (CURRENT  DATABASE  ID) 

2.  CURDBNAME  (CURRENT  DATABASE  NAME) 

3.  CURHOST  (CURRENT  HOST  NAME  ) 

4.  CUR  DBMS  (CURRENT  DATABASE  MANAGEMENT) 

IF  ALL  4  ABOVE  GLOBAL  VARIAVLES  ARE  DEFINED.  THEN 
THE  RETURN  STATUS  IS  O.  OTHERWISE  -1 


ARGUMENTS : 


DB  ID  - 
DBNAME  - 
HOSTNAME  . 
DBMSNAME  - 
STATUS  » 


I  NT  * 

CHAR  * 
CHAR  * 
CHAR  * 
I  NT  * 


ROUTINES  CALLED: 


STRNCPY 

CALLED  DIRECTLY  BY: 


GETDBST  -  RETURN  INFORMATION  ABOUT  THE  CURRENT  SESSIONS' 

DATABASE 

GETRDH  -  RETURN  WITH  CURRENT  SESSIONS'  DATA  BASE  INFO 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-691 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GETMAPC 

SELECT  ALL  PROJECT  DATA  FIELDS  MATCHING  A 

GIVEN  TAG  NO 

VAX- 11  COBOL 

SUBROUTINE 

GETMAPC 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


GETMAPC  SELECTS  ALL  ROWS  FROM  PRO JECTDATAF I ELD  WHOSE  TAG 
NUMBERS  MATCH  THE  INPUT  ARGUMENT.  THE  NUMBER  OF  ROWS  SEL¬ 
ECTED  IS  RETURNED  AS  THE  OUTPUT  ARGUMENT. 


AN  NDML  SELECT  STATEMENT  IS  USED  TO  RETRIEVE  ALL  OCCURRENCES 
OF  PRO JECT_DATA_F I ELD  WHOSE  TAG_NO  MATCHES  THE  INPUT 
ARGUMENT.  THE  NUMBER  OF  OCCURRENCES  RETRIEVED  IS  RETURNED 
AS  THE  OUTPUT  ARGUMENT. 


ARGUMENTS : 


TAG-NO  -  DSPLY  [S9(9)] 
REC -COUNT  .  DSPLY  [S9(9)] 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE- FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ERRPRO 


3-692 
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HDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GETNCHR 

GET  THE  NEXT  CHARACTER  FROM  EITHER 
STANDARD  INPUT 
C 

FUNCTION 
I  NT  () 

GETNCHR 

.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


OR  FORMS  COMMAND  BUFFER  DEPENDING  ON  MODE 


SYNOPSIS 

C 

COBOL 

FORTRAN 


GETNCHR ( 0CHR , FLAG ) 

CALL  "GETNCHR"  USING 

CHR 

FLAG. 

CALL  GETNCHR (CHR , FLAG) 


INPUT: 


OUTPUT : 

INT  *CHR 
INT  ‘FLAG 

DESCRIPTION 

GETNCHR  GETS  THE  NEXT  CHARACTER  FROM  THE  INPUT  SOURCE 
DEPENDING 

ON  WHETHER  IN  BATCH  MODE  (STANDARD  INPUT)  OR  INTERACTIVE 
OR  UIMS 

MODES  (FORMS  COMMAND  BUFFER).  IF  OK,  FLAG  -  0,  IF 


3-694 
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NEWLINE 

CHARACTER,  FLAG  -  1 .  IF  TAB  CHARACTER,  FLAG  -  2  AND  IF 
EOF, 

FLAG  -  3.  ALSO.  IF  EOF  ENCOUNTERED.  THE  GLOBAL 
SKIP_FLAG  IS  SET 

TO  EOF. 

ARGUMENTS : 


CHR  -  I NT  * 

FLAG  -  I NT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

NDDL 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 


ROUTINES  CALLED: 

GETCHAR 

CALLED  DIRECTLY  BY: 

STRINS  -  INSERT  DESCRIPTION  TEXT  INTO  THE  CDM 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


3-695 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


GETNNUM 

C 

FUNCTION 
I  NT  () 
GETNNUM 
-C 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY: 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


SYNOPSIS 

C  —  GETNNUM  ( POOLNO ,  NEXTNO) 

COBOL  --  CALL  "GETNNUM"  USING 

POOL-NO. 
NEXT_NO . 

FORTRAN  —  CALL  GETNNUM  (POOLNO. NEXT  NO) 


INPUT : 

INT  * POOL_NO  ; 

OUTPUT : 

INT  *NEXT_NO  ; 

NEXTNO  WILL  BE  A  ZERO  IF  ANY  TROUBLES  WERE  FOUND 
DESCRPIPTION 

THIS  ROUTINE  RETURNS  A  UNIQUE  NUMBER  FOR  A  POOL  NUMBER 
ARGUMENTS : 


POOLNO  -  INT  * 

NEXT  NO  -  INT  * 


ROUTINES  CALLED: 


NRGET 
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ERRPRO 

OERROR  -  ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 


CALLED  DIRECTLY  BY: 


* 


ADDKC 

ADDKW 

ADDMIG 

ADDOAC 

BLDATT 

BLDATT1 

CRTDOM 

CRTENT 

CRTMOD 

CRTREL 

CRTVIEW 

DEFDB 

DEFSET 

I CO PENT 

KEYLOOK 

INSDFLD 

INSDI 

INSDT 

INSRTYP 


-  CONTROLS  PROCESS  FOR  KEY  CLASS  CLAUSE  FOR 

CREATE/ ALTER  ENTITY 

-  ADDS  KEYWORDS  FOR  COMMANDS  USING  "ADD 

KEYWORD" (OPTIONAL) 

-  PROCESS  THE  ADD  MIGRATES  ...  SET .. CLAUSE 

-  ADD  ATTRIBUTE  AS  AN  OWNED  ATTRIBUTE  AND  AS  ATT 

USE  CLASS 

-  CREATE  ATT  CLASS  AND  ATT  NAME  FOR  A 

MODEL (CREATE /COPY  ATT) 

-  CREATES  ATT  CLASS  AND  ATT  NAME  FOR  A 

MODEL (CREATE /COPY  ATT) 

-  PROGRAM  NAME  CRTDOM 

-  CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING  A  NEW 

ENTITY  CLASS. 

-  CONTROL  THE  PROCESSING  LOGIC  IF  CREATING  A 

MODEL  WITHIN  THE  SYSTE 

-  CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING 

A  NEW  RELATION  CLA 

-  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  CREATE 

VIEW  COMMAND. 

-  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

DATABASE  TO  THE  SYST 

-  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DEFINE 

SET  COMMAND. 

-  INTERACTIVE  COPY  ENTITY  WITH 

ATRRIBUTES , KEYWORDS , ALIAS , DESC 

-  RETRIVES  KEYCLASS  NAME  AND  NUMBER  BASED  ON  TAG 

NO 

-  INSERT  A  RECORD  INTO  THE  DATAFIELD  ENTITY. 

-  INSERT  A  RECORD  INTO  DATA_ITEM 

-  INSERT  A  RECORD  INTO  USER_DEF_DATA_TYPE 

-  INSERT  A  RECORD  INTO  THE  RECORD  TYPE  ENTITY.  IF 


USED  IN  MAIN  PROGRAM(S): 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


GETNXNO 

C 

FUNCTION 
I  NT  () 
GETNXNO 
.C 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


4 


DESCRIPTION: 


SYNOPSIS 

C  —  GETNXNO  ( POOL_NO ,  NEXTNO,  STATUS) 

COBOL  —  CALL  "GETNXNO"  USING 

POOL-NO , 

NEXTNO, 

STATUS . 

FORTRAN  --  CALL  GETNXNO  (POOLNO.NEXT  NO, STATUS) 


INPUT: 

INT  *  POOLNO  ; 

OUTPUT: 

INT  *NEXT_NO  ; 

INT  * STATUS  ; 

DESCRPIPTION 

THIS  ROUTINE  GET  A  UNIQUE  NUMBER  OF  A  POOL  NUMBER  FROM 
NEXTNUMBER 

RELATION 
ARGUMENTS : 


POOLNO  -  INT  * 
NEXTNO  -  INT  * 
STATUS  =  INT  * 
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ROUTINES  CALLED: 


C0SQL3  -  ORACLE  ROUTINE 

ERRRPT  -  HANDLE  ANY  ERROR  CODE  FROM  ORACLE* 

UPDNXNO 

OOFETCH  -  ORACLE  ROUTINE 

COEXEC  -  ORACLE  ROUTINE 

COBINDN  -  ORACLE  ROUTINE 

CODFINN  -  ORACLE  ROUTINE 


CALLED  DIRECTLY  BY: 


NRGET 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


GETRCID 

QUERIES  CDM  FOR 
RELATION  CLASS 
VAX- 11  COBOL 
SUBROUTINE 
GETRCID 
•  PRC 


INFORMATION  ABOUT 


HOST: 

SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


A 


DESCRIPTION: 


THIS  ROUTINE  DOES  AN  NDML  SELECT  TO  RETRIEVE  INFORMATION 
ABOUT  THE  RELATION  CLASS. 


ARGUMENTS : 


RC-NO  *  DSPLY  [S9(9) ] 
IND-EC-NO  -  DSPLY  [S9(9)] 
RC-NAME  -  DSPLY  [X(30)3 
DEP-EC-NO  -  DSPLY  [S9(9)3 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


ERRPRO 


CALLED  DIRECTLY  BY: 


3-700 


lViY*YIWV«YWlAWl. 
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GETRCNM  -  RETRIEVE  RELTION  CLASS  NAME,  IND  AND  DEP  ENTITY 

NAMES 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


HDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GETRCNM 

RETRIEVE  RELTION  CLASS  NAME,  IND  AND  DEP 

ENTITY  NAMES 

VAX- 11  COBOL 

SUBROUTINE 

GETRCNM 

.COB 

CDM 

PS41100 


THIS  ROUTINE  RETRIEVES  THE  INDEPENDENT  ENTITY  CLASS  NAME 
RELATION  NAME  AND  DEPENDENT  ENTITY  CLASS  NAME  - 


ARGUMENTS : 


RC-NO  ■=  DSPLY  tS9(9)  ] 
IND-EC-NAME  -  DSPLY  [X(30)] 
RC-NAME  -  DSPLY  [X(30)] 
DEP-EC-NAME  -  DSPLY  [X(30)] 


INCLUDE  FILES: 


ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


GETRCID 

RETRECP 

ERRPRO 


QUERIES  CDM  FOR  INFORMATION  ABOUT  A  RELATION 
CLASS 

RET I EVE  AN  ENTITY  CLASS  NAME  FOR  A  GIVEN  NO. 
AND  NAME  TYPE 


3-702 
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CALLED  DIRECTLY  BY: 

RRCKW2  -  COMPARES  RELATION  CLASS  KEY  WORDS  FOR  TWO  MODELS 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GETRDH 

RETURN  WITH  CURRENT 
INFO 

VAX- 11  COBOL 
SUBROUTINE 
GETRDH 
.COB 

CDM 

PS41100 


SESSIONS'  DATA  BASE 


THIS  ROUTINE  RETURNS  WITH  INFORMATION  ABOUT  THE  DATA  BASE 
WHICH  IS  OBTAINED  EITHER  FROM  THE  PARSER  LISTS  OR  FROM 
INFORMATION  WHICH  IS  GLOBALLY  AVAILABLE. 


EXTRACT  THE  DATA  BASE  NAME  AND  HOST  NAME  FROM  THE  PARSER 
LIST.  IF  NO  INFORMATION  IS  RETRIEVED,  THE  CURRENT  DATA 
BASE  IS  ASSUMED.  ALSO,  EXTRACT  THE  RECORD  TYPE  FROM  THE 
PARSER  LIST. 


ARGUMENTS : 


DB-ID  -  DSPLY  [S9(9)3 
RT-ID  =  DSPLY  [X( 30) 3 
DB-NAME  -  DSPLY  [X(30)3 
HOST-NAME  -  DSPLY  [X(30)3 
DBMS -NAME  -  DSPLY  lX(30)3 
RETURN-STATUS  =  DSPLY  [S9(9)3 


INCLUDE  FILES: 


LISTNOS  -  VALID  LIST  NUMBERS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 
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ROUTINES  CALLED: 


CPFONE 

VERDBAS 

UERROR 

CHGLOBL 

GETGLOB 

ERRPRO 


-  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

-  VERIFY  A  DATA  BASE  FOR  A  GIVEN  NAME  AND  HOST 

-  ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 

-  CHANGES  THE  GLOBAL  DB  PARAMETERS 

-  WILL  PROVIDE  GLOBAL  VARIABLES 


CALLED  DIRECTLY  BY: 


DEFREC  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 

RECORD  FOR  THE  SYSTE 


USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME :  HALT 

PURPOSE:  HALT  WITH  COMMIT'  OR  'ROLLBACK'. 

LANGUAGE :  C 

MODULE  TYPE :  FUNCTION 

FUNCTION  TYPE:  I  NT  () 

SOURCE  FILE :  HALT 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 
DESCRIPTION: 


SYNOPSIS 

C  —  HALT ( STATUS )  ; 

COBOL  —  CALL  "HALT"  USING 

STATUS . 

FORTRAN  —  CALL  HALT  (STATUS) 


INPUT : 

NONE 

OUTPUT : 

I NT  *  STATUS  ; 


DESCRPIPTION : 

THIS  ROUTINE  PROCESSES  THE  HALT'  COMMAND  WITH  COMMIT' 
OR  'ROLLBACK' 

IF  SUCCESSFULLY  DELETED  THE  RECORD  .  THE  STATUS  AND 
RETURN  VALUE  BOTH 
WILL  BE  0  ,  OTHERWISE  -1. 

ARGUMENTS : 


STATUS  -  INT  * 


INCLUDE  FILES: 


PS  620141100 
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LISTID  -  PROVIDES  LIST  OF  PARSED  OBJECTS 


ROUTINES  CALLED: 


CPFONE  -  EXTRACT  THE  FIRST  TOKEN  FROM  THE  NAMED  LIST 

STRNCMP 

ROLBACK  -  ROLBACK  THE  TRANSACTIONS. 

COMMIT  -  STORE  THE  REUSEABLE  NUMBER  TO  THE  DATA  BASE. 

CALLED  DIRECTLY  BY: 

BRANCHR  -  PERFORMS  MULTI-WAY  CALL  TO  THE 
USED  IN  MAIN  PROGRAM ( S ) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

SOURCE  FILE : 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


I COP ATT 

INTERACTIVE  COPY  ATTRIBUTE. 
KEYWORDS . ALIAS . DESCRS . 

VAX- 11  COBOL 
SUBROUTINE 
I COP ATT 
.COB 

CDM 

PS41100 


WITH 


DESCRIPTION: 


THIS  ROUTINE  IS  CALLED  BY  COPY  ATTRIBUTE.  IT  COPIES  AN 
ATTRIBUTE  EITHER  WITHIN  THE  MODEL  OR  TO  ANOTHER  MODEL.  IT 
ALSO  COPIES  THE  KEYWORDS.  DESCRIPTIONS  AND  ALIASES  IF  THE 
COMMAND  SPECIFIES  THIS  REQUIREMENT. 


ARGUMENTS : 


MOD-NO  -  DSPLY  [S9(9)3 
AC-NAME1  -  DSPLY  [X(30)3 
AC-NAME2  -  DSPLY  [X(30)3 
DOM-NO  -  DSPLY  [S9(9)3 
OLD-AC-NO  -  DSPLY  [S9(9)3 
KEYWORD- FLAG  -  DSPLY  [9] 
ALIAS-FLAG  -  DSPLY  [93 
DESC-FLAG  -  DSPLY  [9] 


INCLUDE  FILES: 


ERR PRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 
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BLDATT 

OERROR 

INSACHM 

WRTALI 

WRTACKW 

WRTDESC 

ERRPRO 


CREATE  ATT  CLASS  AMD  ATT  NAME  FOR  A 
MODEL ( CREATE / COPY  ATT) 

ISSUE  A  MESSAGE  TO  THE  USER,  CONSIDERED  A 
INSERT  A  RECORD  INTO  ATTRI BUTE_NAME 
RETRIEVE  ALL  ALIAS  NAMES  OF  AN  ATTRIBUTE  CLASS. 
RETREIVE  AND  WRITE  ALL  THE  KEYWORDS  ASSOCIATD 
WITH  AN  ATTRIBUTE  C 
SELECT  A  RECORD  FROM  DESC  TEXT  ENITY 


CALLED  DIRECTLY  BY: 

COPATT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING  AN 

ATTRIBUTE. 

USED  IN  MAIN  PROGRAM(S) : 


NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
1  November  1985 


HDDL  COMMAND  PROCESSOR  Module  Docuaentat ion 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


I COPENT 

INTERACTIVE  COPY  ENTITY  WITH 

ATRRIBUTES . KEYWORDS , ALIAS , DESC 

VAX- 11  COBOL 

SUBROUTINE 

I COPENT 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


THIS  ROUTINE  COPIES  AN  ENTITY  EITHER  WITHIN  A  MODEL  OR  TO 
ANOTHER  MODEL. 


NOTE:  0  :  INTRA  MODEL  COPY 

1  :  INTER  MODEL  COPY 

0  :  KEYWORDS,  ALIAS,  DESCRIPTIONS  WANTED  COPIED 
1  :  ABOVE,  EXCEPTED. 


ARGUMENTS : 


MODEL-NO  -  DSPLY  tS9(9)] 
TO-EC-NAME  -  DSPLY  [X(30)] 
INTER-INTRA  -  DSPLY  [9] 
KW-FLAG  «  DSPLY  [9] 
ALIAS-FLAG  -  DSPLY  [9] 
DESC-FLAG  -  DSPLY  [9] 
FROM-EC-NO  -  DSPLY  [S9(9)l 


INCLUDE  FILES: 


UNIQENO  -  UNIQUE  NUMBER  ASSIGNMENTS  FOR  CDM  OBJECTS 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 
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ROUTINES  CALLED: 


GETNNUM 

INSEC 

UERROR 

INSECNM 

WRTECKW 

WRTDESC 

WRTENAM 

COPY AC 

ERRPRO 


INSERT  A  RECORD  INTO  ENTITYCLASS 
ISSUE  A  MESSAGE  TO  THE  USER.  CONSIDERED  A 
INSERT  A  RECORD  INTO  ENTI YTNAME 
RETREIVE  AND  COPY  ALL  THE  KEYWORDS  ASSOCIATED 
WITH  AN  ENTITY  CLAS 
SELECT  A  RECORD  FROM  DESCTEXT  ENITY 
RETRIEVE  AND  COPY  ALL  THE  ALIAS  NAMES  OF  AN 
ENTITY  CLASS. 

CREATE  AN  ATTRIBUTE.  ASSOCIATE  WITH  ENTITY.  ADD 
KEY  CLASSES 


CALLED  DIRECTLY  BY: 

COPENT  -  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY 

ENTITY  COMMAND. 

USED  IN  MAIN  PROGRAM(S) : 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


INDFROM 

RETRIEVES  RELATIONS, DETERMINES  IND  EC  AND 

GENERATES  NDDL 

VAX- 11  COBOL 

SUBROUTINE 

INDFROM 

.PRC 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION : 


THIS  ROUTINE  SELECTS  ALL  THE  RELATIONS  IN  WHICH  THE 
ROM-ENTITY  IS  AN  INDEPENDENT  ENTITY.  IF  THE  SAME  ENTITIES 
EXIST  IN  THE  TO-MODEL,  BUT  NOT  THE  RELATION,  THEN  CREATE 
RELATION  AND  DESCRIBE  COMMANDS  ARE  GENERATED  FOR  »HE 
FROM -RELAT I ON . 


ARGUMENTS : 


FROM-EC-NO  -  DSPLY  [S9(9)] 
TO-EC-NO  -  DSPLY  [S9(9)] 
FROM-EC-NAME  «  DSPLY  [X(30)l 
TO-EC-NAME  -  DSPLY  [X(30)l 
FROM-MODEL-NO  -  DSPLY  [S9(9)3 
TO-MOD-NO  -  DSPLY  [S9(9)] 
KW-FLAG  -  DSPLY  [9] 

DESC-FLAG  -  DSPLY  [9] 
COMBINE-TYPE  -  DSPLY  [9] 
RCNO-LIST  -  RECRD 


INCLUDE  FILES: 


SRVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

RELTBL  -  LIST  OF  RELATION  CLASSES  IN  A  MODEL 


I 
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ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 


ROUTINES  CALLED: 


SELECNM 

VERRC 

VERENT 

VERRCNM 

GENRNME 

MIGREL 

CMBRKW 

ADDPARM 

GENDESC 

ERRPRO 


RETRIEVE  THE  PRIMARY  NAME  FOR  AN  ENTITY  CLASS 
verify  the  existence  of  a  relation  class. 
VERIFY  THE  EXISTENCE  OF  AN  ENTITY  CLASS  IN  A 
MODEL 

VERIFY  EX I STANCE  OF  A  RELATION  IN  A  MODEL 
FORMAT  THE  CREATE  RELATION  CLAUSE 
GENERATE  A  MIGRATES  CLAUSE  FOR  A  CREATE 
RELATION  COMMAND 

SELECT  AND  GENERATE  RELATION  CLASS  KEYWORDS 
WRITES  80  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS / DEL I M I TER 

GENERATED  NDDL  DESCRIBE  COMMANDS  FOR  A  GIVEN 
OBJECT  TYPE  AND  NO 


CALLED  DIRECTLY  BY: 


CERELS  -  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 

ENTITIES  IN  A  RELATION. 

CMBENT  -  CONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE 

ENTITY  COMMAND. 


USED  IN  MAIN  PROGRAM ( S ) : 


NDDL /MAIN 


MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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NDDL  COMMAND  PROCESSOR  Module  Documentation 


NAME: 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM : 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


INITCMD 

INITIALIZATION  FOR  EACH  COMMAND  TO  BE 

PROCESSED 

C 

FUNCTION 
I  NT  () 

CPF 

.C 

CDM 

PS41100 


DESCRIPTION: 


SYNOPSIS 

C  —  INITCMDC ) 


COBOL  —  CALL  “INITCMD* 


FORTRAN 

CALL  INITCMD 

INPUT : 


OUTPUT : 


DESCRIPTION 

THIS  WILL  PERFORM  A  LOOP  INITIALIZING  THE  DATA  STRUCTURES 
IN  WHICH  THE  PARSER  WILL  STORE  COMMAND  TOKENS. 


INCLUDE  FILES: 


LISTS  -  PROVIDES  THE  DIMENSIONS  OF  THE  NDDL  LISTS 

NDDL  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 


CALLED  DIRECTLY  BY: 
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PRCCMD  -  THIS  ROUTINE  IS  CALLED  TO  HANDLE  ALL 
USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 


PS  620141100 
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NDDL  COMMAND  PROCESSOR  Module  Docuaentat ion 


NAME: 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


INITRDL 

INITIALISE  THE  TABLE  WHICH  STORES  A 

MODELS  RELATIONS 

VAX- 11  COBOL 

SUBROUTINE 

INITRDL 

.COB 


SUBSYSTEM :  CDM 

SUBDIRECTORY : 

DOCUMENTATION  GROUP:  PS41100 


DESCRIPTION: 


INITRDL  initializes  the  RC-DEPKC  table. 

The  table  contains  inforaation  for  every  relation  in  a  nodel 
in  sequence  by  level,  rc-no,  and  dep-ec-no. 


ARGUMENTS : 

RC-DEPKC-LIST  .  RE CRD 

INCLUDE  FILES: 

RCDEPKC  -  LIST  OF  KEYS  MIGRATED  VIA  A  RELATION 

CALLED  DIRECTLY  BY: 

BLRCKC  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL  FIND 

BLRCKC1  -  FOR  EACH  LEVEL  OF  RELATIONS  IN  STRUCTURE 

USED  IN  MAIN  PROGRAM(S): 

NDDL/MAIN  -  MAIN  PROGRAM  FOR  THE  NDDL  COMMAND  PROCESSOR 
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